MIME::Lite attachment => file not readable ??

[sergej]

Hallo Leute,

Mime::lite ist echt super und leicht zu schreiben.
Der Text kommt toll an, nur die Datei will nicht sorecht.

hier die (mod)Fehlermeldung:

Software error:
C:\Verzeichnis\datei.ext: not readable

---------------------------------------------
HTML Übergabe:
<INPUT TYPE="file" NAME="FILE" maxlength="2097152" SIZE="30">
---------------------------------------------
PERL Script:(abgespeckt)
#!/usr/bin/perl -w
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use MIME::Lite;
use MIME::Types;
$query = new CGI;
....
....
$file = $query->param('FILE'); # ---> File Pfad

$msg =  MIME::Lite->new(
 From  => $mailfrom,
 To  => $mailto,
 Subject => $subject,
 Type     =>'TEXT',
        Data     =>"$mailtext"
 );

$msg->attach(
 Type     => 'AUTO',
 Encoding => 'base64',
 Path     => $file,
 Filename => "Filename",
 Disposition => 'attachment');

$msg->send(); # UNIX-sendmail

print "Location: $returnhtml\n\n";

Danke,
Gruß Sergej

[sergej]

Hallo Folks,

Bitte helft mir.
komme sonst nicht weiter!

Danke,
Gruß Sergej

[Helmut]

Hallo,

sollte da nicht Filename => "$Filename", stehen?

Cu Helmut