Select Code to Download

my @arr = someFunc( @dd, split ' ', $all);

my @args = qw/
     name1
     name2
...
/;
my $all = "\n    name1\n    name2\n    name3\n";
my @arr = split ' ', $all;