binmode($filehandle);

  #Datei-Info speichern
  open(OUT, ">uploadrelaisdaten/$upload_id.inf")
    or die("kann nicht schreiben: $!");
  print OUT time()."\n";
  print OUT "$original_name\n";
  close OUT;

  # Datei-Daten speichern
  open(OUT, ">uploadrelaisdaten/$upload_id.dat")
    or die("kann nicht schreiben: $!");
  binmode(OUT);
  $bytecounter = 0;
  while ($zeile = <$filehandle>) {
    print OUT $zeile;
    $bytecounter += length($zeile);
  }
  close OUT;
  close $filehandle;