Hash Perl

%seasons=("A" => "Spring",
          "B" => "Summer",
          "C"  => "Fall",
          "D"  => "Winter",
         );
%days=("Mon" => "Monday",
       "Tue" => "Tuesday",
       "Wed" => undef,
      );
$days{"Wed"}="Wednesday";
$days{5}="Friday";