Select Code to Download

perl -le '
  use strict;
...
  $tree[1] = '2';
  print Dumper @arr;
'

$arr[$i+1]

[ @{$arr[$i+1]} ]

$aref = [@flinstones];
$aref = \@flinstones;