in reply to Converting a hash element into an array

And you can condense that a bit: 
for (0..3) {
   chomp(my $key = <STDIN>);
   chomp(my $val = <STDIN>);
   push @{$hash{$key}}, $val;
}

[download]

In Section Seekers of Perl Wisdom