#!d:\perl\bin\perl.exe -w use CGI qw(:standard); use CGI::Carp 'fatalsToBrowser'; use LWP; use HTTP::Request::Common; use HTTP::Cookies; use HTTP::Headers; use LWP::Debug qw(+); use URI::Escape qw(uri_escape_utf8 uri_escape uri_unescape); print "Content-type:text/html;charset=UTF-8\n\n" ; use Net::SSL; use lib "D:\\Perl64\\site\\lib"; # "D:\\Perl64\\lib"; use WWW::Mechanize;