Re: Help!! Retrieving Image File

his modification and look at your log file: my $x; while ( ) { printf( STDERR "Chunk %d %d bytes.\n", ++$x, length ); print; } For a 40K jpeg I get 140 writes. Using read() it writes in three chunks. Your code is telling perl to flush after every print, and then it goes on

Re: Help!! Retrieving Image File

t; > Code 1: It didnt work... >> > >> > #!/usr/bin/perl >> > >> > use CGI; >> > $query = new CGI; >> > my $filepath='/home/myaccount/uploads/laptop.jpg'; >> > >> > print $query->header('image/jpeg'