use strict;

open(IMAGE, "image.gif");
	binmode(IMAGE);
    	my @image = <IMAGE>;
	binmode(STDOUT);
close(IMAGE);


print "Content-type: image/gif\n\n";
print @image;