in reply to Re^2: Form Action
in thread Form Action

using here-docs will make that output code cleaner and resolve some quoting issues (your onClick values will be problematic as-is)... 
print <<EOF;
Content-type: text/html

<HTML>
<HEAD>
  <TITLE>Forum</TITLE>
</HEAD>
<BODY>
  <FORM METHOD="POST">
  <INPUT TYPE="submit" VALUE="Preview" name="preview" onClick="this.fo
+rm.action='preview.cgi';this.form.target=''">
  <INPUT TYPE="submit" VALUE="Submit Reply" name="reply" onClick="this
+.form.action='createreply.cgi';this.form.target=''">
  </FORM>
</BODY>
</HTML>

[download]
or, using CGI: 
print
  header,
  start_html( -title => 'forum' ),
  start_form( -method => 'POST' ),
  submit( -name => 'preview', -value=>'Preview', -onClick => "this.for
+m.action='preview.cgi';this.form.target=''" ),
  submit( -name => 'reply', -value=>'Submit Reply', -onClick => "this.
+form.action='createreply.cgi';this.form.target=''" ),
  end_form,
  end_html,
;

[download]

In Section Seekers of Perl Wisdom