Hash Perl

#Format:
#values(ASSOC_ARRAY)
#values ASSOC_ARRAY
# The values function returns the values in a hash
%weekday= (    '1'=>'Monday',
               '2'=>'Tuesday',
               '3'=>'Wednesday',
               '4'=>'Thursday',
               '5'=>'Friday',
               '6'=>'Saturday',
               '7'=>'Sunday',
              );
foreach $value ( values(%weekday)){print "$value";}
print "\n";