The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
GRICHTER / Embperl-2.4.0 / test / cmp / inputjava.htm 
  <html>
  <body>
    <form action="script.htm" method="POST">
^      <input type=(hidden|"hidden") name="Screen" value="1">

      Screen 1<br>
^      <input type=(submit|"submit") name="Command" value="Start" onClick="document.forms\[0\].Command.action = 'Start'">
^      <input type=(submit|"submit") name="Command" value="Next" onClick="document.forms\[0\].Command.action = 'Next'">
    </form>
    <select name="foo" onChange="javascript:this.value=this.value.toUpperCase();"> </select>
	<foo name="foo" onChange="javascript:this.value=this.value.toUpperCase();">

	<select name="foo" bla="xxx" onChange="javascript:this.value=this.value.toUpperCase();"  bla="xxx"> </select>
	<foo name="foo"  bla="xxx" onChange="javascript:this.value=this.value.toUpperCase();" bla="xxx">

	<select bla="xxx" onChange="javascript:this.value=this.value.toUpperCase();"   name="xxx"> </select>
	<foo  bla="xxx" onChange="javascript:this.value=this.value.toUpperCase();" name="xxx">

	<input type="text" name="titleref" value=""  SIZE="20"    
        MAXSIZE="20" onChange="javascript:this.value=this.value.toUpperCase();">

^	<input type=("text"|'text') name="titleref" value=""  SIZE='20'    
        MAXSIZE="20" onChange='javascript:this.value=this.value.toUpperCase();'>

^	<input type=("text"|'text') name="titleref" value=""  SIZE='20'    
        MAXSIZE="20" onChange='javascript:this.value=this.value.toUpperCase(1);'>

    </body>
  </html>