Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

jvector's scratchpad

by jvector (Friar)
on Aug 30, 2008 at 18:41 UTC ( [id://707940] : scratchpad . print w/replies, xml ) Need Help??

#!/bin/perl use strict; use warnings; use CAM::PDF; my $doc = CAM::PDF->new('PPC_Info_Leaflet.pdf'); my $txt; for (1..4) { $txt .= $doc->getPageText($_); $txt .= "\n"; } print $txt;