Register #### @arr = $mech->find_all_links; $link_obj = @arr[4]; #### eval {$mech->follow_link( url => $link_obj->url, tag => $link_obj->tag) };