Select Code to Download

Use of uninit val in concat (.) or string at filebot.pl line 149.
Use of uninit val in subst (s///) at filebot.pl line 150.
Cannot do that because Is a directory at filebot.pl line 157.

$file =~ s/.*[\/\\](.*)/$1/gi;

sysopen( ... ) or die "Cannot do that because $!";
...
   print UPLOADFILE or die "Cannot do that because $!";

die "not a Fh" unless ref($upload_filehandle) eq 'Fh';