If you change this:

my @files = `find . -name "*.pl";
[download]

To this:

my @files = `find . -name "*.pl"`;
[download]

It will work, but make all of your *.pl files say nothing but #!/usr/local/bin/perl. Thought I'd point that out.

-- Yes, I am a criminal. My crime is that of defyance.