Another very convenient format to use in CGI scripts is the "Here" document, as described, for example, in the Camel Book Programming Perl, 3rd edition, pp. 66-67. The glossary in that book comments that "in Perl here documents are just a fancy form of quoting."

In your case something like

print <<EOF;
<p><h1>Your form was sent.</h1></p>
<a href="javascript:history.back()">Back to the form</a>
EOF

[download]

where the 'terminator' of the "here" document is defined by the word after the << and the text between that line and the terminating line (in this case
EOF
on a line by itself in the first column, followed immediately by a return) is printed unchanged, including the internal quotes AND the return at the end of each line (so you don't have to put the "\n" stuff in).

This format makes it much easier to work with HTML code in the midst of Perl, at least until you are ready for templates and separating the HTML display code entirely from the Perl logic.

Live in the moment

In reply to Re: JavaScript in CGI by Speedy
in thread JavaScript in CGI by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.