#!/usr/bin/perl use strict; use warnings; use PDF::OCR2; $PDF::OCR2::CHECK_PDF = 1; my $pdf = PDF::OCR2->new('/home/marto/02_ProProInt2nd_Tab01.pdf'); print $pdf->text;