Did the open succeed? What HTTP status code was returned for the image? (Easier to see if you type in the CGI url directly in the address bar.) What's in the access and error logs?
As an aside, it makes no sense to use <> on a binary file unless you set a record length using $/ since you might end up reading the file a character at a time or the whole file at once.
open(my $fh, '<', $qfn) or die($qfn); binmode($fh); local $/ = \( 64*1024 ); print while <$fh>;
In reply to Re: open and print image
by ikegami
in thread open and print image
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |