You can use HTTP::Recorder to record a sample lookup from your browser. You can use WWW::Mechanize to playback the web request.

You can probably modify the original request to change to change the serial number and loop over your list of serial numbers.