The following uses CGI.pm as an easy way to deal with CGI vars. Sends me email from any web form. Prints each var "paco=taco" format.

#!/usr/bin/perl
use CGI qw(:standard);
@submits = param();

open(MAIL, "|/usr/sbin/sendmail -oi -t") or die "Can't Open Sendmail: 
+$!";
print MAIL <<EOF;
From: Web Page
To: patrick\@pacoswithtacos.net
Subject: Web Form Submission

EOF

foreach $item (@submits) {
   print MAIL "$item=".param($item)."\n";
}
close(MAIL);
print "Location: ../thank_you.html\n\n";
[download]

You have several options: you can pipe to sendmail directly, or you can use a module, using either sendmail (Mail::Mailer) or an SMTP server (Mail::Internet, which uses Net::SMTP).

use Net::SMTP;

  # Get ready to send messages via SMTP
  $thetext  = "From: me\@myself.org\n";
  $thetext .= "To: you\@yourself.com\n";
  $thetext .= "Subject: Some Stuff\n";
  $thetext .= "\n";

  # Send the message and disconnect
  $smtp=Net::SMTP->new('localhost');
  $smtp->mail("me\@myself.org");
  $smtp->recipient("you\@yourself.com");
  $smtp->data($thetext);
  $smtp->quit;
[download]

$subject = "Mail Message";
$to = "name@server.com";

open(MAIL, "|mail -s '$subject' $to");

print MAIL "message body" 
print MAIL "\n.\n"; # to quit

close(MAIL);
[download]

If available 'mailx' gives more flexibility, specially when using the tilda sequences, for example if you have a the contents of data file to send you can do something like $example = `mailx whoever\@whereever.com <<! ~<$file_name !`;

Hmm, managed to lose the rest of my code. The point was you can include files in the mail message with a simple ~<$filename call