Send email using SMTP

Hi all,

I am trying to send an email using the following code:

use Net::SMTP;

$smtp = Net::SMTP->new("smtp.yahoo.com");
$smtp->mail('fulviocg');

but the error below is happening:

Can't call method "mail" on an undefined value at ....

Can someone help me?

Thanks

Fúlvio