Select Code to Download

my @newArr = map {
 # put it all back together
    join '', @$_
...
 # break off the digits and put in an anonymous array
    [ split /(\d+)/ ]
  } @arr;

@_=qw;
Just another Perl hacker,;
;$_=q=print
"@_"= and eval;