I have also had trouble loading files on Windows 2000. The files were slightly larger with extra line feeds. Adding the line " binmode FileName " solved this problem.

# Save Picture File if updated or new
$file_name = param(upfile);
if ($file_name ne "")
{
  open(OUTF,">test.jpg") or &dienice("Couldn't open pic for
    writing.  Please notify webmaster Falazar.");
    while(read($file_name,$data,1024))
    { 
      binmode OUTF;  # Added this line
      print OUTF $data; 
    }
  close(OUTF);
}
[download]