Select Code to Download

$ perl -e '

...
$firstname = 'Edward';
$var = 1;
@jack = ( 'a', 1, { b => 3, c => [ 1, 2 ] } );

$ perl -e '

...
$firstname = 'Edward';
$var = 1;
$jack = [ 'a', 1, { b => 3, c => [ 1, 2 ] } ];