Mega Code Archive

 

Categories / Perl / Hash

 

The each function returns, in random order, a two-element array

#Format: each(ASSOC_ARRAY) #! /usr/bin/perl # The each function retrieves both keys and values from a hash %weekday=(               'Mon' => 'Monday',               'Tue' => 'Tuesday',               'Wed' => 'Wednesday',               'Thu' => 'Thursday',               'Fri' => 'Friday',               'Sat' => 'Saturday',               'Sun' => 'Sunday',              ); while(($key,$value)=each(%weekday)){    print "$key = $value\n"; }