perl -MNet::IMAP::Simple -E'say Net::IMAP::Simple->new(q(imap.gmail.com:993), use_ssl => 1, debug => 1)->login(qw(user pass))'