Help for this page
my %names = map { $_ => '' } qw(foo bar baz); ... # access individually print "$names{foo}\n";
my @names = ('') x 6; ... # access individually print "$names[2]\n"; # prints 3rd element