sub display{
    print <<"EOF";
    <FORM action="forum.pl?quicklog" method="POST">
    ...(form stuff here)...
    </form>
    EOF
    }