#!/usr/bin/perl #-w # use strict; use PDF::OCR2; my $p = PDF::OCR2->new('02_ProProInt2nd_Tab01.pdf'); my $text_all = $p->text; my @text_pages = $p->text; my $page_object = $p->page(1);