Help for this page

Select Code to Download

Select or download this

my $file = "\\\\cromedome\\images\\182.TIF";

print $request->header(-type=>'image/tif',
                       -attachment=>$file);

Select or download this

my $file = "\\\\cromedome\\images\\182.TIF";
my $buffer;
...
open TIF, $file or die "Cant open image";
read TIF, $buffer, -s(TIF);
print $request->header(-type=>"image/tif"), $buffer;