#!/usr/bin/perl -w
######################################################################
# formget.pl
######################################################################
# Perl Power! - Michael Schilli 1998
######################################################################

use LWP::UserAgent;

$ua = LWP::UserAgent->new();

$request = HTTP::Request->new('GET', 
              "http://localhost/cgi-bin/dump.cgi?customer=wesley&cc=visa");

                              # format query
$response = $ua->request($request);

print $response->content();