# my $pdf = CAM::PDF->new(test.pdf); 
# should be
my $pdf = CAM::PDF->new("test.pdf");

##</code><code>##

my $pdf = CAM::PDF->new("test.pdf")
    or die "Couldn't read PDF 'test.pdf'";