Using SMTP module to send mail

Hi,

I'm trying to get a script i've written in Perl to email me the output of the queries i'm doing on a few sql servers, but for the life of me can't get the mail function to work. I was trying to use SendMail but keep getting this error;

Can't locate SendMail.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.8.7 /usr/local/share/perl/5.8.7 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.8 /usr/share/perl/5.8 /usr/local/lib/site_perl .) at connect3.pl line 4.
BEGIN failed--compilation aborted at connect3.pl line 4.

here is the code i'm using as the output is fine and works although i can't get the email to work:
my $out = sprintf("===================================================================\n");
my $out2= sprintf("QA not yet processed for 192.168.20.115(SP) is $results1\n");
my $out3= sprintf("QA not yet processed for 192.168.20.116(SW) is $results2\n");
my $out4= sprintf("QA not yet processed for 192.168.20.118(Pinnacle) is $results3\n");
my $out5= sprintf("Admin not yet processed for 192.168.20.115(SP) is $results4\n");
my $out6= sprintf("Admin not yet processed for 192.168.20.116(SW) is $results5\n");
my $to="myemail@mydomain";
my $from="user@mydomin";
my $subject="stats for qa and admin";

open(MAIL, "|/usr/sbin/sendmail -t" or die "Can't open sendmail\n");

print MAIL "To: $to\\n";
print MAIL "From: $from\\n";
print MAIL "Subject: $subject\\n";

print MAIL $out;
print MAIL $out2;
print MAIL $out3;
print MAIL $out4;
print MAIL $out5;
print MAIL $out6;

I had a friend suggest using the SMTP Perl Module to send email instead of SendMail. So i used cpan to download the module and i think set it up although i'm not sure if this is working.

any ideas?
cheers
sleepless