Select Code to Download

$ perl -d -e 1
  DB<1> $X = [ 1 .. 10 ]; # create a reference to an anonymous array
...
0  3
  DB<6> x $X->[1] # display an element of the anonymous array by its r
+eference
0  2