- or download this
use WWW::Mechanize;
my $mech = WWW::Mechanize->new();
...
} else {
print "Not a successful connection\n"; }
- or download this
print $mech->content;
- or download this
$mech->dump_text;
- or download this
#This block of code is intended to fill in the required forms
$mech->get("https://account.login.page.asp");
...
$mech->form_number(4);
$mech->field( "enddate", $end_date);
$mech->click();
- or download this
use WWW::Mechanize;
use IO::Socket::SSL qw();
...
SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE,
verify_hostname => 0,});