use Data::Dumper; %userName = qw/Zoya Amol Krishna Ram Yamuna Ganesh Balaji Chayatanya/; print "Before sort array \n"; print Dumper(%userName); print "After Sort Array \n"; foreach $name (sort %userName) { print $name."\n"; }
use Data::Dumper; %userName = qw/Zoya Amol Krishna Ram Yamuna Ganesh Balaji Chayatanya/; print "Before sort array \n"; print Dumper(%userName); print "After Sort Array \n"; foreach $name (sort %userName) { print $name."\n"; }