You should always post your exact error message.

When I merely paste your code into my editor, I immediately see (due to syntax highlighting) this line is a problem:

my $files = ($directory, "\", $file);
[download]

It is a syntax error to escape the double quote like that. It needs to eventually be followed by another double quote.

Also, do you use strict and warnings?