$fh = IO::File->new('http://www.q.hpixml.com/servlet/HpiGate1_0?forwa
+rd=YES&efxid=0503506&password=testing&initials=mk&function=SEARCH&vrm
+=fp08rou&XML=YES&product=HPI11&devicetype=XM');