Hi There
I'm trying to make a script that sends an file attached to a certain e-mail address. The file is local on my machine, wich is not the machine where the site and the script are hosted.
I'm getting the following error message:

Software error:
C:\foo\foo.txt: not readable

Is that happening 'cause the server doesn't support MIME::Lite? Or is that an error in the code (see below). If is the first alternative, is there any solution to achieve this without the help of a module?
Here is the code:

#!/usr/bin/perl

use CGI::Carp qw(fatalsToBrowser);
use MIME::Lite;

require './cgi-lib.pl';

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
    ($name, $value) = split(/=/, $pair);
    $value =~ tr/+/ /;
    $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
    $FORM{$name} = $value;
}

$from = $FORM{'from'};
$to = $FORM{'to'};
$subject = $FORM{'subject'};
$file = FORM{'file'};
$page = $FORM{'page'};

        my $msg = MIME::Lite->new (
               From => '$from',
               To   => '$to',
               Subject => '$subject',
               Type    => 'multipart/mixed');

        $msg->attach(
            Type     =>'BINARY',
            Path     =>"$file");


        $msg->send;

print "Location: $page\n\n";
[download]

Thanks in advance,

Er Galvão Abbott
a.k.a. Lobo, DaWolf
Webdeveloper