Select Code to Download

open(FF, ">","/tmp/holamundo.pdf");
print FF $pdf->Finish();
close(FF);

print $client "HTTP/1.0 200 OK", Socket::CRLF;
print $client "Content-type: application/pdf", Socket::CRLF; #view pdf
+ inline
...
print $client Socket::CRLF;
my $SLURP  = `$localfile`;
print $client $SLURP;