use Mail::Sendmail;

%mail = ( To      => $recipient,
          From    => $sender,
          Subject => "stuff",
          Message => "blah",
	);
sendmail(%mail) or print STDERR "$Mail::Sendmail::error";