I believe in the actual code ... This code may be useful to you:
use CAM :: PDF;
my $ file_name = "abc.pdf";
my $ pdf = CAM :: PDF → new ($ file_name); my $ no_pages = $ pdf-> numPages ();
for (my $ i = 1; $ igetPageText ($ i); print "$ page \ n"; # may u can read its array / etc ... the manipulation can be done here}
Mandar pande
source share