#!/usr/bin/perl

use warnings;
use strict;


use LWP::UserAgent;
use HTTP::Request::Common;


my $ua = LWP::UserAgent->new;
$ua->request(GET 'http://search.cpan.org/~gaas/libwww-perl-5.808/lib/LWP/Simple.pm');
$ua->request(POST 'A:\Directory\Location\');