print STDOUT $query->header(-type=>'image/png');
binmode STDOUT;
print STDOUT $image->png();