Select Code to Download

$ perl -MData::Dumper -le '
    @array = (1 .. 3);
...
    print Dumper \@array;
    delete $array[2];
    print Dumper \@array;'

$VAR1 = [
          1,
...
$VAR1 = [
          1
        ];