Thank you Mike for the answer.
I went ahead and made the change only to get an error further down the page. The code I displayed, was actually code from the WWW::Mechanize PM and was not written by me. It has been around a while and even Randall Schwartz (sp?! sorry if wrong) has included a demo in the example.pod file. I cannot help but feel there is something else missing and that this should compile.

For completeness the error I get later when making the changes suggested above is:

C:\Perl Dev\Screen Scraper Test>perl despair.pl
Can't locate object method "get" via kage "WWW::Mechanize" (perhaps yo
+u forgot to load "WWW::Mechanize"?) at C:/Perl/site/lib/WWW/Mechanize
+.pm line 183.
[download]

Line 183 of the file is:

sub get {
    my $self = shift;
    my $uri = shift;

    $uri = $self->{base}
        ? URI->new_abs( $uri, $self->{base} )
        : URI->new( $uri );

    return $self->SUPER::get( $uri, @_ );
}
[download]

The return $self line exactly.
Thank you for you help though. It is always appreciated.