# When it is print
    # Redirect to another web page
    if (param('S1') eq "Send") {
        print BOBIN $datajoin;
        print redirect("http://.../submitq.cgi");
    }