|Date:||Tue, 1 Jul 2003 21:24:15 -0500|
|To:||bug-wwW-Mechanize [...] rt.cpan.org|
|From:||Andy Lester <andy [...] petdance.com>|
|Subject:||Fwd: problem with WWW::Mechanize|
Show quoted text
>Delivered-To: email@example.com >Date: Tue, 1 Jul 2003 12:55:59 -0400 >From: Hans Dieter Pearcey <firstname.lastname@example.org> >To: email@example.com >Subject: problem with WWW::Mechanize >X-Spam-Status: No, hits=-2.5 required=6.0 > tests=USER_AGENT_MUTT > version=2.55 >X-Spam-Level: >X-Spam-Checker-Version: SpamAssassin 2.55 (18.104.22.168-2003-05-19-exp) >Lines: 37 > >use WWW::Mechanize; >use Test::More 'no_plan'; >use strict; > >our $site ||= "www.listbox.com"; >our $login ||= "login/"; > >my $a = WWW::Mechanize->new; > >my $loginurl = "https://$site/$login"; >$a->get($loginurl); > >ok ($a->success, 'login success') or exit 1; >like($a->content, qr/please log in/i, 'login content') or exit 1; > >$a->form_number(1); >$a->field(listname => 'firstname.lastname@example.org'); >$a->click("authenticating"); >#ok ($a->success, 'auth success') or exit 1; > >when run, this produces: > >% ./01_login >ok 1 - login success >ok 2 - login content >Unexpected field value-- Andy Lester => email@example.com => www.petdance.com => AIM:petdance at (eval 5) line 1 >1..2 ># Looks like your test died just after 2. > >do you know why that is? if I comment out the $a->click, it doesn't >give this error, but obviously then it can't proceed. > >googling didn't help; I found some people who had this error when they >were fiddling with referers that weren't plain strings, but I'm not, and >someone who had almost this exact problem, but didn't get an answer. > >hdp.