Perl by Example - 02

(In Script)
    # The keys function returns the keys of a hash
1   %weekday= (
               '1'=>'Monday',
               '2'=>'Tuesday',
               '3'=>'Wednesday',
               '4'=>'Thursday',
               '5'=>'Friday',
               '6'=>'Saturday',
               '7'=>'Sunday',
              );
2   foreach $key ( keys(%weekday) ){print "$key ";}
    print "\n";
3   foreach $key ( sort keys(%weekday) ){print $key ;}
    print "\n";

(Output)
2   7 1 2 3 4 5 6
3   1 2 3 4 5 6 7

Explanation