use PDF::Parse;
use Data::Dumper;

my $pdf->TargetFile($filename);
$pdf->LoadPageInfo;

my @size = $pdf->PageSize;
my $rotation = $pdf->PageRotation;

print Dumper(\@size);
print Dumper($rotation);