That should be:

opendir(DIR, ".") or die "Can't open the current directory: $!\n";
[download]

instead of just open()