my $pdf = slurp("file.pdf"); # Contains the whole PDF file
print "Content-type: application/pdf\n\n$pdf";