use CGI;

print qq{<form action='/cgi-bin/opal/display_seview.cgi' method='post' target='new'>
<input type='hidden' name='text' value='@{ [ CGI->escapeHTML($joined) ] }'/>
<input type='hidden' name='header' value='@{ [ CGI->escapeHTML($query) ] }'/>
<input type='hidden' name='sequence' value='@{ [ CGI->escapeHTML($whole_sequence) ] }'/>
<input type='submit' value='View Applet in new window'/></form>
};