# HTML generating script:
use CGI;
my $q = CGI->new();
print $q->header(), $q->start_html(),
...



# Image generating script:
use CGI;
use GD::Graph::points;
print "Content-Type: iamge/png\n\n";
# generate plot here
...
binmode STDOUT;
print $myimg->png;