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