print "Content-type: image/png\n\n"; binmode STDOUT; print $myimage->png;