|
#!/usr/bin/perl
use WWW::Mechanize;
my $link = "https://x.x/bt/query.cgi?GoAheadAndLogIn=1";
my $login = "x\@gx.com";
my $pass = "xx";
my $mech = WWW::Mechanize->new();
$mech->agent_alias( 'Windows IE 6' );
$mech->get( $link );
my %login = (
"Bugzilla_login"=> $login,
"Bugzilla_password"=> $pass);
$mech->set_fields(%login);
$mech->click( 'GoAheadAndLogIn' );
# ./bt.pl
No such field 'Bugzilla_password' at /usr/lib/perl5/site_perl/5.8.8/WWW/Mechanize.pm line 1265
In new 2.2 version of bugzilla it returns that there is no such field 'Bugzilla_password' but in previous 1.x versions it worked ok, can someone suggest what might be wrong ?
|
(14)
]
