Select Code to Download

 perl -MData::Dumper -e 'my $ref = []; print Dumper eval Dumper [$ref,
+ $ref];

$VAR1 = [
          [],
          undef
        ];