Select Code to Download

Select 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 );

Select or download this

<td>
<input type="hidden" name="serverList" value="">
...

</select>
</td>

Select 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 );

Select or download this

        for (@{$self->{menu}}) {
            if ((defined($val) && defined($_->{value}) && $val eq $_->
+{value}) ||
...
            }
            $i++;
        }