#!/usr/bin/perl

use LWP::Simple qw(get);

my $res = get('http://www.google.com/');