Select Code to Download

#!/usr/bin/perl -w
use strict;
...
}
print "Content-Type: image/png\n\n";
print $im->png;

#!/usr/bin/perl -w
 
...
</body>
</html>
HTML