#!/usr/bin/perl -w use strict; use CGI::Carp qw(fatalsToBrowser warningsToBrowser); use CGI qw/:standard/; use LWP::Simple; print "Content-type:text/html\n\n"; my $query = $ENV{'QUERY_STRING'}; my $content = get("http://www.google.com?$query"); die "Couldn't get it!" unless defined $content; print $content;
In reply to LWP::Simple on Windows 2003 IIS by jonnyfolk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |