perl -MMail::Sendmail -e1