Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Is this a bug in mechanize::select(), or am I just confused? (or something else) (answer: bad html)

by rustycar (Novice)
on Jul 31, 2008 at 01:47 UTC ( #701312=perlquestion: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my $ans = 1; # or whatever.
    while ($ans)
    ...
    $inputobj = $mech->current_form()->find_input( 'accept', 'submit');
    die 'argh! Cannot find Accept button on the iSCSI Access page!' unless
    + $inputobj;
    $ans = $mech->click_button( input => $inputobj );
    
  2. or download this
    <td>
    <input type="hidden" name="serverList" value="">
    ...
    
    </select>
    </td>
    
  3. or download this
    
    while ($ans)
    ...
    $inputobj = $mech->current_form()->find_input( 'accept', 'submit');
    die 'argh! Cannot find Accept button on the iSCSI Access page!' unless
    + $inputobj;
    $ans = $mech->click_button( input => $inputobj );
    
  4. or download this
            for (@{$self->{menu}}) {
                if ((defined($val) && defined($_->{value}) && $val eq $_->
    +{value}) ||
    ...
                }
                $i++;
            }
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (11)
As of 2014-12-26 15:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (171 votes), past polls