use LWP;
use LWP 5.64;
use URI;
LWP::Simple

my $browser = LWP::UserAgent->new;

$prod = <>;
my $url = URI->new( 'http://www.amazon.com/s/ref=nb_ss_gw?url=search-alias%3Dtools&field-keywords=$prod;' );
$url->query_form{
'product number' => <>;
}

my $response = $browser->get( $url );