Select Code to Download

use strict;
use warnings;
...
my %hash;
mypush @{ $hash{key} }, "Hello", "World";
print Dumper \%hash;

$VAR1 = {
          'key' => [
                     'Hello',
                     'World'
                   ]
        };