my $login; foreach (HTML::Form->parse($self->{resp})) { #if ($_->find_input('btnLogin')) { print Dumper($_); if ($_->find_input('Login', 'button')) { $login = $_; last; } } die $! if not $login; #### { '/' => '/', 'value_name' => '', 'tabindex' => '4', 'value' => 'Login', 'class' => 'login_button button', 'id' => 'btnLogin', 'type' => 'button' },