Does this answer your question ?
#!/usr/bin/perl -- use WWW::Mechanize; use Data::Dumper; use strict; use warnings; my $res = $mech->get('http://example.com'); print int $res == $mech->res print int $res->status == $mech->res->status print int $res->status == $mech->status my $res2 = $mech->get('http://example.com/two'); print int $res == $mech->res print int $res->status == $mech->res->status print int $res->status == $mech->status print Dumper( { mech => $mech, rest => $res , rest2 => $res } ); __END__ #!/usr/bin/perl -- use WWW::Mechanize; use Data::Dumper; use strict; use warnings; my $mech = WWW::Mechanize->new; my $res = $mech->get('http://example.com'); print int $res == $mech->res; ## HELLO print int $res->code == $mech->res->code; print int $res->code == $mech->status ; my $res2 = $mech->get('http://example.com/two'); print int $res2 == $mech->res; ## HELLO print int $res2->code == $mech->res->code ; print int $res2->code == $mech->status; print "\n"; print Dumper( { mech => $mech }, { res1 => $res , res2 => $res } ); __END__ 111111 $VAR1 = { 'mech' => bless( { ... $VAR2 = { 'res1' => $VAR1->{'mech'}{'page_stack'}[0]{'res'}, 'res2' => $VAR1->{'mech'}{'page_stack'}[0]{'res'} };
Like a regular browser, a stack of pages is kept, a history, so you can go forward or back
Also Basic debugging checklist item 4 ( Dumper )
In reply to Re: Working with Mechinaze and Responses
by Anonymous Monk
in thread Working with Mechinaze and Responses
by ShipMyPants
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |