#! /usr/local/bin/regina
/* Simple form : process data from p20_sampform.cgi                */
/*-----------------------------------------------------------------*/


call setdll    /* loads the HHNS shared library */

his_name = ""  /* in case nothing was entered in the field 'name'   */
his_pwd  = ""  /* in case nothing was entered in the field 'passwd' */

/*--- this will setup the Rexx variables his_name ans his_pwd     ---*/
call CgiInit "TITLE='A simple form' BGCOLOR=FFFFFF"


say "Hello" his_name", your entered '"his_pwd"' as password."


call CgiEnd


return 0