Select Code to Download

use strict;

use CGI;
$query = new CGI;

$topic_directory = "topics";

if($query->param('topic')){
     $topic = $query->param('topic');
     &file_error unless (&open_topic);

sub print_response_form{
     print "<FORM METHOD=\"post\" ACTION=\"post.pl\">\n";
     print "<INPUT TYPE=\"hidden\" NAME=\"action\" ";

# isn't this
print qq{<FORM METHOD="post" ACTION="post.pl">\n};

# better than this?
print "<FORM METHOD=\"post\" ACTION=\"post.pl\">\n";