mmm... I have problems with this line:

print $query->header(type=>'image/gif');

Looking at the rest of your post, it seems that this could be better:

print $query->header(type=>'text/html');