Select Code to Download

@l = 0..10;
%h = (a => 1, b => 2);

print @l->[4]; # prints 4
print %h->{b}; # prints 2

print $l[4]; # prints 4
print $h{b}; # prints 2