Select Code to Download

map { s/^-// } @ARGV;
print join ("\n", @ARGV) . "\n";

foo
bar

my @array = map { s/^-// } @ARGV; 
print join ("\n", @array) . "\n";

1
1