require Mail::Send;

$msg = new Mail::Send;
$msg->to('fmogo@mninter.net');
$msg->subject('Send Mail Test');
$msg->delete($header);
$fh = $msg->open('smtp', Server => "smtp.uu.nl") or die "Couldn't open message: $!" ;
print $fh "Just testing the Mail::Send package";
$fh->close;