Mechanize: first attempt at scraping (should be something trivial)

[G M]

Hi all,

I'm making an attempt at my first screen scraping script.

For some reason the script doesn't continue after the invocation of the get 
method on the last line:

use strict;
use WWW::Mechanize;
use HTML::TokeParser;
use Data::Dumper;
print "Content-type: text/html\n\n";
print "setting up mech<br />";
my $agent = WWW::Mechanize->new();
   $agent->agent_alias('Windows Mozilla');
   print "mech setup";
  $agent->get('http://www.easyjet.com/en/');


Can anyone see anything wrong with this?  I've tried double quotes and 
different urls but it doesn't attempt to "get" the page.


Thanks in advance for any advice on this.

G :)