Select Code to Download

#!/usr/local/bin/perl -w

...
 print $q->end_html;
}

Content-Type: text/html; charset=ISO-8859-1

...
<table width="100%" border="1"><tr><th>key</th> <th>value</th></tr> <t
+r><td>camel</td> <td>flea</td></tr> <tr><td>frog</td> <td>green</td><
+/tr></table>
</body>
</html>