For printing, there's also here-docs:

print <<"EOF";
<form action='/cgi-bin/opal/display_seview.cgi' method='post' target='
+new'>
<input type='hidden' name='text' value='$joined'/>
<input type='hidden' name='header' value='$query'/>
<input type='hidden' name='sequence' value='$whole_sequence'/>
<input type='submit' value='View Applet in new window'/></form>
EOF
[download]

But anyways, as you're using CGI, you could build the form with CGI's methods - or grab CGI::FormBuilder.

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}