I don't think you understand what qw does. Try running this and I think you will figure it out.

my @args = qw/ perl -i -ne 'print unless eof' filename /;
print join "|", @args;
[download]

--

flounder