use Data::Dumper;

use PDF;

$filename ="out.pdf";
$pdf=PDF->new($filename);