BEGIN { $ENV{ HTTPS_VERSION }= 3; }; use WWW::Mechanize;