Help for this page
open FILE, "<", $MyPDF; binmode FILE;
binmode STDOUT; # read the whole file ... print "Content-Length: $length\r\n"; print "\r\n"; # http header end print $file;