print header(-expires=>"now", -type=>"application/octet-stream", -content_disposition=>"filename=filename.pdf", -filename=>"filename.pdf");
binmode(STDOUT);
print $pdf->stringify;