use Mail::Sendmail;

# Create the message hash
my %mail = (
    To => 'You <your@address.com>',    # To address..
    From => 'Me <my@address.com>',    # From address..
    Message => 'Hello, world!',    # The message body..
    Smtp => 'your.mail.server'    # erase this if you want to use "loc
+alhost" (default)
);

# Send the message
unless (sendmail(%mail)) {
    # Error!
}

# All is well.
[download]

You may be happier using Mail::Mailer, MIME::Lite, or one of the other mail modules on CPAN.

Those who know that they are profound strive for clarity. Those who
would like to seem profound to the crowd strive for obscurity.
            --Friedrich Nietzsche

Many OS keep there sendmail program in different places,
in these situations it is common to find that the OS provide their own packages for the Perl Modules:
like here for Mandrake (as one for instance).
In these situations it is better to forsake perl -MCPAN -e 'shell' for RPMs in your case.

Alternatively you could use symlinks to cobble a solution.

--

Brother Frankus.

¤

Update: To get you started here is an example of a mail::sender subroutine:

sub mailout{
    $sender = new Mail::Sender;

    $sender->Open({
        smtp => 'mail', #insert your smtp server here
        from => "$from",
        fake_from => "$ffrom",
        to => "$to",
        encoding => "quoted-printable",
        subject => "$subject",
        ctype => "$htype", # could be plain or html
        }) || die "Sender error: $sender, $Mail::Sender::Error!\n";

    # body of email
    $sender->SendEnc(@body) || die "Sender error: $sender, $Mail::Send
+er::Error!\n";

    # send email
    $sender->Close || die "Sender error: $sender, $Mail::Sender::Error
+!\n";
}
[download]

Neil Watson
watson-wilson.ca