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?
  }
}

[download]
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.

Replies are listed 'Best First'.
Re: WWW::Mechanize help
by zwon (Abbot) 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;
  }
}

    [download]
    (not tested)
[reply]
[d/l]
[select]
      it does nothing...
[reply]

        it does nothing...

        Sure it does

[reply]

Back to Seekers of Perl Wisdom