use strict;

use LWP::Simple;

my $content = get("http://www.photographersdirect.com/sellers/pe_sellerredirect.asp?$ENV{'QUERY_STRING'}");

print "Content-type: text/html\n\n$content" if (defined $content);