Win8 Strawberry 5.8.9.5 (32)  Mon 11/16/2020 14:26:26
C:\@Work\Perl\monks
>perl -Mstrict -Mwarnings -l
use Data::Dump qw(dd);

my $foo = [ 99, 42, 137, ];
dd '$foo', $foo;

my @foo = (qw(foo bar baz));
dd '@foo', \@foo;

my %foo = (qw(cero zero  uno one  dos two));
dd '%foo', \%foo;

print $foo->[2];
print $foo[2];
print $foo{'dos'};

^Z
("\$foo", [99, 42, 137])

("\@foo", ["foo", "bar", "baz"])

("%foo", { cero => "zero", dos => "two", uno => "one" })

137
baz
two