print $cgi->header( -type=>'image/jpeg', -attachment=>$jpegFile); open( JPEG, $jpegFile ) || die "Unable to open $jpegFile for read: $!"; my $buffer; while ( sysread( JPEG, $buffer, 65536 ) ) { print $buffer; } close(JPEG);