I'm working on a script where I create a webpage with a Send button on the bottom. If the users click on it, I want to run a subroutine to write data to a file, and then give confirmation page that data was sent.

This is what I have:

print "<hr>";
print "<form>";<br>
print "<center><input type=button value=Send name=S1 onclick=sendq>";
print "</center></form>";
print "</font></body></html>";

sub sendq {
    #print BOBIN $datajoin;
    use CGI; print redirect("http://www.gailborden.info/services/bob/s
+ubmitq.htm");
}
[download]