I tried exactly as fsn said. I also added BINMODE before the FILEHANDLE as BUU said. But it still does not work.
Following is html file contents (mycounter.html)
<HTML>
<head>
<title> Test page </title>
</head>
<BODY>
<H> My test page</H>
My counter below: <BR>
<IMG SRC = "mycounter.cgi">
</BODY>
</HTML>
and Following is the contents of the perl cgi file (mycounter.cgi)
#!C:\Progra~1\Perl\bin\perl
use CGI;
$co=new CGI;
$size = stat("counter.jpg")[7];
open (FILEHANDLE,"<counter.jpg");
binmode FILEHANDLE;
read FILEHANDLE,$imagedata,$size;
close FILEHANDLE;
print
$co->header(-type=>'image/jpeg'),
$imagedata;
But the only thing I get when I open mycounter.html is the following string
"My test page. My counter below:" followed by a blank image file.
I have checked and the image file counter.jpg exists in the current directory.
But why does the html display a blank image?
If you could identify any other possible reasons for this it would be really appreciated.
thanks
grao5
|