use CAM::PDF;
use LWP::Simple qw(getstore);

use strict;
use warnings;

my $url = 'http://data.lexus.nl/home/data/LexusV8/pdf/Lexusdealerlijst.pdf';
my ($file) = $url =~ m{([^/]*)$};

getstore($url, $file) if ! -e $file;

my $cam = CAM::PDF->new($file);
print $cam->getPageText(1);