use Mail::Sendmail;

my %message = (To      => "some address",
               From    => "your address",
               Subject => "subject",
               Message => "text");

sendmail(%message) or die $Mail::Sendmail::error;