Net::SMTP->new( 'blargh' )
  #or die
  or die $@
  ;

#  produces "Net::SMTP: Bad hostname 'blargh' at -e line 1.".