use Image::Magick;
use PDF::OCR2;

my $image = Image::Magick->new;
$image->Set(density=>'300x300');
$image->Read('agendas/2016-02-02 Natural Resources.pdf', compression=>'None');
$image->Crop(geometry=>'1248x520+936+520');
$image->Write(filename=>'crop.pdf', compression=>'None');

my $p      = PDF::OCR2->new('crop.pdf');
my $text_all = $p->text;

print $text_all;