Select Code to Download

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

...
$html .= $htmln;

print $html;

#!/usr/local/bin/perl -w
use CGI;                             # load CGI routines
...


------------------------------------------------------------

SELECT form_table.fname, form_table.title, form_table.desc, form_rec.f
+orm_url, form_rec.form_type FROM form_table, form_rec WHERE form_tabl
+e.fname = form_rec.fname and form_table.fname LIKE '%a%'

#------------------------------------ Rows
$htmln =<<EOF;
...
    </tr>
EOF
$html .= $htmln;

from
      <td>$s_info{desc}</td>

      <td>&nbsp;</td>

#------------------------------------ Rows
$htmln =<<EOF;
...
    </tr>
EOF
$html .= $htmln;