I like this a lot. I wish it printed a png header:

use CGI;
print CGI->new->header("image/png");
[download]

UPDATE: actually, it looks like it does already but it's commented out... Just you nevermind me and my rashness, posting before I read the source... Although, if you did use CGI, you could also read x_size, y_size, num_lines, wrap_prob, turn_prob, etc from the param()s. That would be neat too.