#!/usr/bin/perl

use Mail::Send;

$to = 'valaki@piros.and';
$form = 'masvalaki@zold.and';
$subject = 'Teszt level 002';

$body = "A level.";

$msg = new Mail::Send Subject=>$subject, To=>$to;

$fh = $msg->open;

print $fh $body . "\n";

$fh->close;