Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

WWW::Mechanize help

by Anonymous Monk
on May 06, 2012 at 08:54 UTC ( #969127=perlquestion: print w/ replies, xml ) Need Help??
Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

hiya monks :p i'm tryna get all text boxes from a web page and filter out the one that i want..
$mech->get( $page ); my @find_text = $mech->find_all_inputs( type => 'text' ); for $boxes (@find_text) { if (length($boxes) > 100) { print #contents of the input box here? } }
if the length of the string in the input box is > 100 then thats the box i want. the catch here is that the input box has no name or ID, just a tag.

Comment on WWW::Mechanize help
Download Code
Replies are listed 'Best First'.
Re: WWW::Mechanize help
by zwon (Monsignor) on May 06, 2012 at 10:48 UTC

    so what's the problem, you already got a list of inputs, why do you need names? Just use the value method:

    for $boxes (@find_text) { if (length($boxes->value) > 100) { print $boxes->value; } }
    (not tested)
      it does nothing...

        it does nothing...

        Sure it does

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://969127]
Approved by tobyink
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (11)
As of 2015-07-29 11:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (263 votes), past polls