#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;

use WWW::Mechanize;

my $mech = WWW::Mechanize->new;
$mech->get('http://www.perlmonks.com/');
print $mech->content;