Something you could do is the following, because print also accepts a list:

print qw(Here's a long line blah blah blah 
         that I would like broken up), "\n";
[download]

But if there are commas inside, some warnings might appear

Best regards,
perl -le "s==*F=e=>y~\*martinF~stronat~=>s~[^\w]~~g=>chop,print"