#!/usr/bin/perl -w
use HTML::Tree;
use LWP::Simple;
use strict;

getstore ("http://www.guardian.co.uk", "guardian.htm") or die "Cannot get the page.\n";

my $tree = HTML::TreeBuilder->new();
$tree = parse_file("guardian.htm);