############################################ # At this time we are LOGGED IN, so off to the TRADING POST ############################################ print "1"; $mech->get($url2); print "1a"; $mech->submit_form( form_name => "trade1", fields => { "criteria" => 'Lot Number', search_string => "$lotnum" } ) or die "Error: $!"; print "2";