my %hash;
$hash{beta} = 'x';
for my $name ( qw(alpha beta) ) {
    push @{$hash{$name}}, 123, 456;
}

use Data::Dumper;
print Dumper \%hash;

##</code><code>##

$VAR1 = {
          'alpha' => [
                       123,
                       456
                     ],
          'beta' => 'x'
        };

##</code><code>##

print Dumper \@x;

##</code><code>##

$VAR1 = [
          123,
          456
        ];

##</code><code>##

use strict;

##</code><code>##

Can't use string ("x") as an ARRAY ref while "strict refs" in use at test.pl line 6.