Hash Perl

  1. Home
  2. Perl
  3. Hash
  4. 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";
}