#!/usr/bin/perl

use LWP::UserAgent;
use LWP::Simple;
use URI::URL;
use WWW::Mechanize;
use HTML::LinkExtor;

my $url = 'http://foo.bar.baz';
getprint('http://foo.bar.baz');
$user = LWP::UserAgent->new();
$user->get($url);