use Crypt::SSLeay;
use Net::SSL;
use WWW::Mechanize;
....
$ENV{PERL_NET_HTTPS_SSL_SOCKET_CLASS} = "Net::SSL";

$mech = WWW::Mechanize->new(autocheck =>1, noproxy =>1,ssl_opts => { 'verify_hostname' => 0 });
...