I m trying to parse the HTML page using the following code:

#!/usr/bin/perl
use Modern::Perl;
use URI::Escape;
use HTML::TreeBuilder;
use Try::Tiny;
use LWP::Simple;
use HTML::TreeBuilder::XPath;
use Data::Dumper;
use strict;
use warnings;
my $debug=1;
my $base='http://www.costacrociere.it';
my $url='/it/lista_crociere/capitali_nord_europa-201207-2.html';
my $page = get($base.$url) ;
my $p = HTML::TreeBuilder::XPath->new_from_content( $page );
binmode( STDOUT, ':utf8');

my @trips= $p->findnodes( '//div[@class="info-cruise"]');
foreach my $trip (@trips){
        my $title = $trip->findvalue( './/div[@class="sx"]/h3');
        print "Trip name: $title\n";
        my $price = $trip->findvalue( './/span[@class="new-price"]');
        print "price: $price\n";
        my $includes = $trip->findvalue('.//p[@class="info-price"]/spa
+n[6]'); #I added this line
        print "Includes: $includes\n";

        foreach my $info ( $trip->findnodes( './/p[@class="itinerari-i
+nfo"]//span[@class != "note" and @class != "strike"]')){
                my $info_title= $info->findnodes( './b')->[0];
                print $info_title->as_text();
                $info_title->detach;
                my $info_value= $info->as_text;
                print ":", $info_value, "\n";
        }
    my $pic = $trip->findvalue('.//img[@class="image_map"]/@src'); # I
+ added this line.
        print "Picture: $base$pic\n";
        print "\n";
}
[download]

But it keeps throwing the error saying the parse() is un-initialized in the TreeBuilder.Pm file under the HTML library.I m using perl version : 5.16.3.1603 Please Help with some suggestions.