#  Assuming 'blargh' is an unreachable host.
perl -MNet::SMTP -e '$m = Net::SMTP->new( "blargh" ); $m->mail( $EVN{USER} )'

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