use WWW::Mechanize;
use strict;
use warnings;

my $mech = WWW::Mechanize->new();

$mech->get('http://www.immoweb.be/FR/Rent.Estate.cfm?IdBien=2805206&xpage=1');
$mech->dump_text;