- or download this
sub credentials
{
...
return (undef, undef);
}
- or download this
package Nonce;
use base 'WWW::Mechanize';
...
$M->get('http://anywhere.com/mytest?rm=test', @args);
# etc.
- or download this
use WWW::Mechanize;
my $M = WWW::Mechanize->new();
$M->credentials( 'host:port', 'realm', 'user', 'password' );
# etc.