#!/usr/bin/perl -w
  use LWP::UserAgent;
  my $ua = LWP::UserAgent->new;

  # Create a request

my $response = $ua->post('http://www.sanmateocountytaxcollector.org/SMCWPS/SearchParcels',{parcelNumber=>'048022230',searchType=>'parcel',listFirst=>'S',bkList=>'SS',addressTypeDsp=>'',addressType=>'',actionType=>'search',nextPage=>'. 2Fpages 2FparcelList.jsp',parcel1=>'048',parcel2=>'022',parcel3=>'230'});

my $content = $response->content;
print $content;