richter 00/09/13 22:53:23
Modified: test/cmp div.htm include.htm includeerr1.htm includeerr2.htm
input.htm inputjava.htm
test/conf .cvsignore
test/html div.htm include.htm input.htm
test/html/match div.htm
test/html/nph div.htm
test/html/ofunc div.htm
Log:
Embperl 1 & 2 Source Integration
Revision Changes Path
1.3 +4 -17 embperl/test/cmp/div.htm
Index: div.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/div.htm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- div.htm 1998/10/29 20:14:34 1.2
+++ div.htm 2000/09/14 05:53:19 1.3
@@ -89,20 +89,15 @@
<table border="2" width="100%">
<tr>
- <th>1</th>
- <th>2</th>
- <th>3</th>
- </tr>
- <tr>
<td>a1/1 </td>
</tr>
-
+
<tr>
<td>a2/1 </td>
<td>a2/2 </td>
</tr>
-
+
<tr>
<td>a3/1 </td>
@@ -114,22 +109,15 @@
<table border="2" width="100%">
<tr>
- <th>b3/1</th>
-
- <th>b3/2</th>
-
- <th>b3/3</th>
- </tr>
- <tr>
<td>a1/1 </td>
</tr>
-
+
<tr>
<td>a2/1 </td>
<td>a2/2 </td>
</tr>
-
+
<tr>
<td>a3/1 </td>
@@ -336,4 +324,3 @@
</body>
</html>
-
1.8 +2 -2 embperl/test/cmp/include.htm
Index: include.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/include.htm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- include.htm 2000/03/29 07:00:42 1.7
+++ include.htm 2000/09/14 05:53:19 1.8
@@ -12,7 +12,7 @@
<P>Here is some text</P>
<H1> 2.) Include from memory with some Embperl code</H1>
-<table><tr><td>a1</td><td>b2</td><td>c3</td></tr></table></P>
+<table><tr><td>a1</td> <td>b2</td> <td>c3</td> </tr> </table> </P>
<H1> 3.) Include from memory with passing of variables</H1>
@@ -34,7 +34,7 @@
<H1> 7.) Presetup \%fdat and \@ffld</H1>
<P><table><tr><td>fdat</td><td>text</td></tr><tr><td>test</td><td>value</td></tr></table></P>
-<H1> 8.) Inculde a file</H1>
+<H1> 8a.) Include a file</H1>
Here it starts with some HTML Text<P>
1.3 +1 -1 embperl/test/cmp/includeerr1.htm
Index: includeerr1.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/includeerr1.htm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- includeerr1.htm 1999/10/05 06:02:11 1.2
+++ includeerr1.htm 2000/09/14 05:53:19 1.3
@@ -2,7 +2,7 @@
<H1>Internal Server Error</H1>
The server encountered an internal error or misconfiguration and was unable to
complete your request.<P>
^Please contact the server administrator\,.*?and inform them of the time the error
occurred\, and anything you might have done that may have caused the error
-^\[.*?\]ERR\: 24\: Line 10\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?includeerr1.htm line 10.<p>
+^\[.*?\]ERR\: 24\: Line \d+\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?includeerr1.htm line 10.<p>
^ HTML\:\:Embperl.*?<P>
</BODY></HTML>
1.4 +10 -10 embperl/test/cmp/includeerr2.htm
Index: includeerr2.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/includeerr2.htm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- includeerr2.htm 2000/03/28 19:14:11 1.3
+++ includeerr2.htm 2000/09/14 05:53:19 1.4
@@ -2,16 +2,16 @@
<H1>Internal Server Error</H1>
The server encountered an internal error or misconfiguration and was unable to
complete your request.<P>
^Please contact the server administrator\,.*?and inform them of the time the error
occurred\, and anything you might have done that may have caused the error
-^\[.*?\]ERR\: 32\: Line 6\: Warning in Perl code: Use of uninitialized value
-^\[.*?\]ERR\: 32\: Line 6\: Warning in Perl code: Use of uninitialized value
-^\[.*?\]ERR\: 32\: Line 6\: Warning in Perl code: Use of uninitialized value
-^\[.*?\]ERR\: 32\: Line 18\: Warning in Perl code: Use of uninitialized value
-^\[.*?\]ERR\: 24\: Line 6\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?incerr.htm line 6.<p>
-^\[.*?\]ERR\: 32\: Line 6\: Warning in Perl code: Use of uninitialized value
-^\[.*?\]ERR\: 24\: Line 6\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?incerr.htm line 6.<p>
-^\[.*?\]ERR\: 32\: Line 6\: Warning in Perl code: Use of uninitialized value
-^\[.*?\]ERR\: 24\: Line 6\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?incerr.htm line 6.<p>
-^\[.*?\]ERR\: 32\: Line 6\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 24\: Line \d+\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?incerr.htm line 6.<p>
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 24\: Line \d+\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?incerr.htm line 6.<p>
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
+^\[.*?\]ERR\: 24\: Line \d+\: Error in Perl code: Can't locate object method
"is" via package "here" at .*?incerr.htm line 6.<p>
+^\[.*?\]ERR\: 32\: Line \d+\: Warning in Perl code: Use of uninitialized value
^ HTML\:\:Embperl.*?<P>
</BODY></HTML>
1.13 +71 -263 embperl/test/cmp/input.htm
Index: input.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/input.htm,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -r1.12 -r1.13
--- input.htm 2000/08/18 09:20:36 1.12
+++ input.htm 2000/09/14 05:53:19 1.13
@@ -7,10 +7,13 @@
<form action="inhalt.htm" method="POST">
<p> </p>
+ <input name=neu1 value="no" >
+ <input name=undef value="no">
+
<input>
<input >
<input name="feld1">
- <INPUT name="feld5" VALUE="Wert5">
+ <input name="feld5" value="Wert5">
<input name="feld1" value="Wert1">
<input name="feld5" value="Wert15">
<input name="feld1" value="">
@@ -22,15 +25,18 @@
<input foo>
<input foo >
+ <input name=neu2 value="">
+ <input name='neu3' value=">>">
+
<input type="text" name="feld1" value="Wert1">
<input type="text" name="feld2">
<input type="text" size=10 name="feld3">
<input type="text" name="feld4" size=10>
<input type="text" name="feld5" value="Wert5">
- <INPUT type="text" name="feld6" VALUE="Wert6">
- <INPUT type="text" size=10 name="feld7" VALUE="Wert7">
- <INPUT type="text" name="feld8" size=10 VALUE="Wert8">
+ <input type="text" name="feld6" value="Wert6">
+ <input type="text" size=10 name="feld7" value="Wert7">
+ <input type="text" name="feld8" size=10 value="Wert8">
<input type="checkbox" value="cbv1" name="cb1" checked>
@@ -40,12 +46,12 @@
<input type="checkbox" value="cbv5" name="cb5" checked>
<input type="checkbox" checked name="cb6" value="cbv6">
- <INPUT type="checkbox" name="cb7" value="cbv7" CHECKED>
- <INPUT type="checkbox" value="cbv8" name="cb8" CHECKED>
+ <input type="checkbox" name="cb7" value="cbv7" checked>
+ <input type="checkbox" value="cbv8" name="cb8" checked>
- <INPUT type="checkbox" value="cbv9" name="cb9" >
- <INPUT type="checkbox" name="cb10" value="cbv10">
- <INPUT type="checkbox" name="cb11" value="cbv11">
+ <input type="checkbox" value="cbv9" name="cb9" >
+ <input type="checkbox" name="cb10" value="cbv10">
+ <input type="checkbox" name="cb11" value="cbv11">
<input type="checkbox" name="dec" checked value="a & b">
@@ -122,19 +128,37 @@
<option value="Wert2">Wert2</option>
<option value="Wert3">Wert3</option>
<option value="Wert4">Wert4</option>
- <option value="Wert5" SELECTED>Wert5</option>
+ <option value="Wert5" selected>Wert5</option>
<option value="Wert6">Wert6</option>
<option value="Wert7">Wert7</option>
<option value="Wert8">Wert8</option>
</select>
+ <select name="feld5">
+ <option value="Wert3">Wert3
+ <option value="Wert4">Wert4
+ <option value="Wert5" selected>Wert5
+ </select>
+
+ <select name="feld5">
+ <option>Wert3</option>
+ <option>Wert4</option>
+ <option>Wert5</option>
+ </select>
+
+ <select name="feld5">
+ <option>Wert3
+ <option>Wert4
+ <option>Wert5
+ </select>
+
<select name="mult" multiple>
<option value="Wert1">Wert1</option>
<option value="Wert2">Wert2</option>
- <option value="Wert3" SELECTED>Wert3</option>
+ <option value="Wert3" selected>Wert3</option>
<option value="Wert4">Wert4</option>
<option value="Wert5">Wert5</option>
- <option value="Wert6" SELECTED>Wert6</option>
+ <option value="Wert6" selected>Wert6</option>
<option value="Wert7">Wert7</option>
<option value="Wert8">Wert8</option>
</select>
@@ -151,7 +175,9 @@
</select>
- <table>
+ ks = Kategorie Region cb1 cb10 cb11 cb2 cb3 cb4 cb5 cb6 cb7 cb8 cb9 dec feld1
feld5 feld6 feld7 feld8 mult neu1 neu2 neu3 undef<p>
+
+ <table border=9>
<tr>
<td>Kategorie</td><td>Veranstaltungen</td>
</tr>
@@ -231,148 +257,55 @@
<tr>
<td>mult</td><td>Wert6</td>
</tr>
- </table>
-
-
-
-optDisableInputScan is now: 0 <BR>
-optDisableInputScan is set now to: 1 <BR>
-optDisableInputScan is now: 1 <BR>
-
- <input type="text" name="feld1" value="Wert1">
- <input type="text" name="feld2">
- <input type="text" size=10 name="feld3">
- <input type="text" name="feld4" size=10>
-
- <input type="text" name="feld5" value="Wert5">
- <input type="text" name="feld6">
- <input type="text" size=10 name="feld7">
- <input type="text" name="feld8" size=10>
-
- <select name="feld5">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <table>
- <tr>
- <td>Kategorie</td><td>Veranstaltungen</td>
- </tr>
-
- <tr>
- <td>Region</td><td>Rheinhessen</td>
- </tr>
-
- <tr>
- <td>cb1</td><td>cbv1</td>
- </tr>
-
- <tr>
- <td>cb10</td><td>ncbv10</td>
- </tr>
-
- <tr>
- <td>cb11</td><td>ncbv11</td>
- </tr>
-
- <tr>
- <td>cb2</td><td>cbv2</td>
- </tr>
-
- <tr>
- <td>cb3</td><td>cbv3</td>
- </tr>
-
- <tr>
- <td>cb4</td><td>cbv4</td>
- </tr>
-
- <tr>
- <td>cb5</td><td>cbv5</td>
- </tr>
-
- <tr>
- <td>cb6</td><td>cbv6</td>
- </tr>
<tr>
- <td>cb7</td><td>cbv7</td>
+ <td>neu1</td><td>no</td>
</tr>
<tr>
- <td>cb8</td><td>cbv8</td>
+ <td>neu2</td><td>value=""</td>
</tr>
<tr>
- <td>cb9</td><td>ncbv9</td>
+ <td>neu3</td><td>value="</td>
</tr>
<tr>
- <td>dec</td><td>a & b</td>
- </tr>
-
- <tr>
- <td>feld1</td><td>text1</td>
- </tr>
-
- <tr>
- <td>feld5</td><td>Wert5</td>
- </tr>
-
- <tr>
- <td>feld6</td><td>Wert6</td>
+ <td>undef</td><td>no</td>
</tr>
-
- <tr>
- <td>feld7</td><td>Wert7</td>
- </tr>
-
- <tr>
- <td>feld8</td><td>Wert8</td>
- </tr>
-
- <tr>
- <td>mult</td><td>Wert6</td>
- </tr>
</table>
-optDisableInputScan is now: 1 <BR>
-optDisableInputScan is set now to: 0 <BR>
-optDisableInputScan is now: 0 <BR>
+
<select name="feld5">
<option value="Wert1">Wert1</option>
<option value="Wert2">Wert2</option>
<option value="Wert3">Wert3</option>
<option value="Wert4">Wert4</option>
- <option value="Wert5" SELECTED>Wert5</option>
+ <option value="Wert5" selected>Wert5</option>
<option value="Wert6">Wert6</option>
<option value="Wert7">Wert7</option>
<option value="Wert8">Wert8</option>
</select>
- <INPUT type="checkbox" value="Wert1" name="mult" >
+ <input type="checkbox" value="Wert1" name="mult" >
<input type="checkbox" value="Wert1" name="mult">
- <INPUT type="checkbox" value="Wert2" name="mult" >
+ <input type="checkbox" value="Wert2" name="mult" >
<input type="checkbox" value="Wert2" name="mult">
+ <input type="checkbox" value="Wert3" name="mult" checked>
<input type="checkbox" value="Wert3" name="mult" checked>
- <INPUT type="checkbox" value="Wert3" name="mult" CHECKED>
- <INPUT type="checkbox" value="Wert4" name="mult" >
+ <input type="checkbox" value="Wert4" name="mult" >
<input type="checkbox" value="Wert4" name="mult">
- <INPUT type="checkbox" value="Wert5" name="mult" >
+ <input type="checkbox" value="Wert5" name="mult" >
<input type="checkbox" value="Wert5" name="mult">
+ <input type="checkbox" value="Wert6" name="mult" checked>
<input type="checkbox" value="Wert6" name="mult" checked>
- <INPUT type="checkbox" value="Wert6" name="mult" CHECKED>
- <INPUT type="checkbox" value="Wert7" name="mult" >
+ <input type="checkbox" value="Wert7" name="mult" >
<input type="checkbox" value="Wert7" name="mult">
- <table>
+ ks = Kategorie Region cb1 cb10 cb11 cb2 cb3 cb4 cb5 cb6 cb7 cb8 cb9 dec feld1
feld5 feld6 feld7 feld8 mult neu1 neu2 neu3 undef<p>
+
+ <table border=10>
<tr>
<td>Kategorie</td><td>Veranstaltungen</td>
</tr>
@@ -452,149 +385,24 @@
<tr>
<td>mult</td><td>Wert3 Wert6</td>
</tr>
+
+ <tr>
+ <td>neu1</td><td>no</td>
+ </tr>
+
+ <tr>
+ <td>neu2</td><td>value=""</td>
+ </tr>
+
+ <tr>
+ <td>neu3</td><td>value="</td>
+ </tr>
+
+ <tr>
+ <td>undef</td><td>no</td>
+ </tr>
</table>
-optUndefToEmptyValue is now: 0 <BR>
-optUndefToEmptyValue is set now to: 1 <BR>
-optUndefToEmptyValue is now: 1 <BR>
-
- <input type="text" name="qqfeld1" value="Wert1">
- <INPUT type="text" name="qqfeld2" VALUE="">
- <INPUT type="text" size=10 name="qqfeld3" VALUE="">
- <INPUT type="text" name="qqfeld4" size=10 VALUE="">
-
- <input type="checkbox" name="qqfeld1" value="Wert1">
- <input type="checkbox" name="qqfeld2">
- <input type="checkbox" size=10 name="qqfeld3">
- <input type="checkbox" name="qqfeld4" size=10>
-
-optUndefToEmptyValue is now: 1 <BR>
-optUndefToEmptyValue is set now to: 0 <BR>
-optUndefToEmptyValue is now: 0 <BR>
-
-
-<INPUT type="checkbox" value="Wert1" name="mult2" >
- <input type="checkbox" value="Wert1" name="mult2">
- <input type="checkbox" value="Wert2" name="mult2" checked>
- <INPUT type="checkbox" value="Wert2" name="mult2" CHECKED>
- <INPUT type="checkbox" value="Wert3" name="mult2" >
- <input type="checkbox" value="Wert3" name="mult2">
- <INPUT type="checkbox" value="Wert4" name="mult2" >
- <input type="checkbox" value="Wert4" name="mult2">
- <input type="checkbox" value="Wert5" name="mult2" checked>
- <INPUT type="checkbox" value="Wert5" name="mult2" CHECKED>
- <input type="checkbox" value="Wert6" name="mult2" checked>
- <INPUT type="checkbox" value="Wert6" name="mult2" CHECKED>
- <INPUT type="checkbox" value="Wert7" name="mult2" >
- <input type="checkbox" value="Wert7" name="mult2">
-
-
- <INPUT type="checkbox" value="Wert1" name="mult3" >
- <input type="checkbox" value="Wert1" name="mult3">
- <INPUT type="checkbox" value="Wert2" name="mult3" >
- <input type="checkbox" value="Wert2" name="mult3">
- <INPUT type="checkbox" value="Wert3" name="mult3" >
- <input type="checkbox" value="Wert3" name="mult3">
- <input type="checkbox" value="Wert4" name="mult3" checked>
- <INPUT type="checkbox" value="Wert4" name="mult3" CHECKED>
- <INPUT type="checkbox" value="Wert5" name="mult3" >
- <input type="checkbox" value="Wert5" name="mult3">
- <INPUT type="checkbox" value="Wert6" name="mult3" >
- <input type="checkbox" value="Wert6" name="mult3">
- <INPUT type="checkbox" value="Wert7" name="mult3" >
- <input type="checkbox" value="Wert7" name="mult3">
-
- <select name="mult2">
- <option value="Wert1">Wert1</option>
- <option value="Wert2" SELECTED>Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5" SELECTED>Wert5</option>
- <option value="Wert6" SELECTED>Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="mult3">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4" SELECTED>Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="mult4">
- <option value="Wert1" SELECTED>Wert1</option>
- <option value="Wert2" SELECTED>Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7" SELECTED>Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="mult5">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3" SELECTED>Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
-
- <input type=checkbox name=mycheck value=N checked>
-
- <select name="esc">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="a<b" SELECTED>a<b</option>
- <option value="a>b">a<b</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="escmult">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3" SELECTED>Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="a<b">a<b</option>
- <option value="a>b" SELECTED>a>b</option>
- <option value="Wert8">Wert8</option>
- </select>
-
-optRawInput is now: 0 <BR>
-optRawInput is set now to: 1 <BR>
-optRawInput is now: 1 <BR>
-
- <input type="text" name="feld1" value="Wert1">
- <input type="text" name="feld2">
- <input type="text" size=10 name="feld3">
- <input type="text" name="feld4" size=10>
-
- <input type="text" name="feld5" value="Wert5">
- <INPUT type="text" name="feld6" VALUE="Wert6">
- <INPUT type="text" size=10 name="feld7" VALUE="Wert7">
- <INPUT type="text" name="feld8" size=10 VALUE="Wert8">
-
- <input type="text" name="feld1" value="Wert<1">
- <input type="text" name="feld5" value="Wert<5">
-
- <p><input type="submit" name="Search" value="Absenden"></p>
</form>
</body>
1.4 +3 -3 embperl/test/cmp/inputjava.htm
Index: inputjava.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/inputjava.htm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- inputjava.htm 1999/10/05 06:02:12 1.3
+++ inputjava.htm 2000/09/14 05:53:20 1.4
@@ -1,11 +1,11 @@
<html>
<body>
<form action="script.htm" method="POST">
- <input type=hidden name="Screen" value="1">
+^ <input type=(hidden|"hidden") name="Screen" value="1">
Screen 1<br>
- <input type=submit name="Command" value="Start"
onClick="document.forms[0].Command.action = 'Start'">
- <input type=submit name="Command" value="Next"
onClick="document.forms[0].Command.action = 'Next'">
+^ <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>
</body>
</html>
1.3 +1 -0 embperl/test/conf/.cvsignore
Index: .cvsignore
===================================================================
RCS file: /home/cvs/embperl/test/conf/.cvsignore,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- .cvsignore 2000/09/14 05:17:25 1.2
+++ .cvsignore 2000/09/14 05:53:21 1.3
@@ -1 +1,2 @@
config.pl
+httpd.conf
1.2 +1 -9 embperl/test/html/div.htm
Index: div.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/div.htm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- div.htm 1998/07/14 20:11:20 1.1
+++ div.htm 2000/09/14 05:53:22 1.2
@@ -170,20 +170,12 @@
<table border="2" width="100%">
<tr>
- <th>1</th>
- <th>2</th>
- <th>3</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
<table border="2" width="100%">
<tr>
- <th>[+ $b[2][$col] +]</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
@@ -203,7 +195,7 @@
<P>[+ $HTML::Embperl::VERSION +]<P>
-<P>[+ $tabmode +]<P>
+<P>[+ $tabmode || 17 +]<P>
<P>[+ local $tabmode = 1 +]<P>
<P>
1.7 +2 -2 embperl/test/html/include.htm
Index: include.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/include.htm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- include.htm 2000/03/29 07:00:42 1.6
+++ include.htm 2000/09/14 05:53:22 1.7
@@ -22,7 +22,7 @@
<H1> 2.) Include from memory with some Embperl code</H1>
-[- Execute ({input => \('[- @ar = (a1, b2, c3) -' .
']<table><tr><td>[+$ar[$col]+]</td></tr></table></P>'),
+[- Execute ({input => \('[- @ar = (a1, b2, c3) -' .
']<table><tr><td>[+$ar[$col]+]</td> </tr> </table> </P>'),
mtime => 1,
inputfile => 'table',
}) ;
@@ -99,7 +99,7 @@
-]
-<H1> 8.) Inculde a file</H1>
+<H1> 8a.) Include a file</H1>
[- Execute ('inc.htm') -]
1.11 +30 -188 embperl/test/html/input.htm
Index: input.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/input.htm,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- input.htm 2000/08/17 07:32:10 1.10
+++ input.htm 2000/09/14 05:53:22 1.11
@@ -19,6 +19,9 @@
<form action="inhalt.htm" method="POST">
<p> </p>
+ <input name=neu1 value="[+ 1 > 2?'yes':'no' +]" >
+ <input name=[+ $name || 'undef' +] value="[+ 1 > 2?'yes':'no' +]">
+
<input>
<input >
<input name="feld1">
@@ -34,6 +37,9 @@
<input foo>
<input foo >
+ <input name=neu2 value="[+ 1 > 2 +]">
+ <input name='neu3' value=">>">
+
<input type="text" name="feld1" value="Wert1">
<input type="text" name="feld2">
<input type="text" size=10 name="feld3">
@@ -118,6 +124,24 @@
<option value="Wert8">Wert8</option>
</select>
+ <select name="feld5">
+ <option value="Wert3">Wert3
+ <option value="Wert4">Wert4
+ <option value="Wert5">Wert5
+ </select>
+
+ <select name="feld5">
+ <option>Wert3</option>
+ <option>Wert4</option>
+ <option>Wert5</option>
+ </select>
+
+ <select name="feld5">
+ <option>Wert3
+ <option>Wert4
+ <option>Wert5
+ </select>
+
<select name="mult" multiple>
<option value="Wert1">Wert1</option>
<option value="Wert2">Wert2</option>
@@ -141,30 +165,16 @@
</select>
- [- @ks = sort keys %idat -]
+ ks = [+ @ks = sort keys %idat ; "@ks" +]<p>
- <table>
+ <table border=9>
<tr>
- <td>[+ $ks[$row] +]</td><td>[+ $idat{$ks[$row] || ''} +]</td>
+ <td>[+ $ks[$i=$row] +]</td><td>[+ $idat{$ks[$i] || '<undef>'}
+]</td>
</tr>
</table>
-optDisableInputScan is now: [+ $optDisableInputScan +] <BR>
-optDisableInputScan is set now to: [+ $optDisableInputScan = 1 +] <BR>
-optDisableInputScan is now: [+ $optDisableInputScan +] <BR>
-
- <input type="text" name="feld1" value="Wert1">
- <input type="text" name="feld2">
- <input type="text" size=10 name="feld3">
- <input type="text" name="feld4" size=10>
-
- <input type="text" name="feld5" value="Wert5">
- <input type="text" name="feld6">
- <input type="text" size=10 name="feld7">
- <input type="text" name="feld8" size=10>
-
<select name="feld5">
<option value="Wert1">Wert1</option>
<option value="Wert2">Wert2</option>
@@ -176,27 +186,6 @@
<option value="Wert8">Wert8</option>
</select>
- <table>
- <tr>
- <td>[+ $ks[$row] +]</td><td>[+ $idat{$ks[$row] || ''} +]</td>
- </tr>
- </table>
-
-optDisableInputScan is now: [+ $optDisableInputScan +] <BR>
-optDisableInputScan is set now to: [+ $optDisableInputScan = 0 +] <BR>
-optDisableInputScan is now: [+ $optDisableInputScan +] <BR>
-
- <select name="feld5">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
<input type="checkbox" value="Wert1" name="mult" checked>
<input type="checkbox" value="Wert1" name="mult">
<input type="checkbox" value="Wert2" name="mult" checked>
@@ -212,161 +201,14 @@
<input type="checkbox" value="Wert7" name="mult" checked>
<input type="checkbox" value="Wert7" name="mult">
- [- @ks = sort keys %idat -]
+ ks = [+ @ks = sort keys %idat ; "@ks" +]<p>
- <table>
+ <table border=10>
<tr>
- <td>[+ $ks[$row] +]</td><td>[+ $idat{$ks[$row] || ''} +]</td>
+ <td>[+ $ks[$i=$row] +]</td><td>[+ $idat{$ks[$i] || '<undef>'}
+]</td>
</tr>
</table>
-optUndefToEmptyValue is now: [+ $optUndefToEmptyValue +] <BR>
-optUndefToEmptyValue is set now to: [+ $optUndefToEmptyValue = 1 +] <BR>
-optUndefToEmptyValue is now: [+ $optUndefToEmptyValue +] <BR>
-
- <input type="text" name="qqfeld1" value="Wert1">
- <input type="text" name="qqfeld2">
- <input type="text" size=10 name="qqfeld3">
- <input type="text" name="qqfeld4" size=10>
-
- <input type="checkbox" name="qqfeld1" value="Wert1">
- <input type="checkbox" name="qqfeld2">
- <input type="checkbox" size=10 name="qqfeld3">
- <input type="checkbox" name="qqfeld4" size=10>
-
-optUndefToEmptyValue is now: [+ $optUndefToEmptyValue +] <BR>
-optUndefToEmptyValue is set now to: [+ $optUndefToEmptyValue = 0 +] <BR>
-optUndefToEmptyValue is now: [+ $optUndefToEmptyValue +] <BR>
-
-
-[- $fdat{mult2} = "Wert2\tWert5\tWert6" ; -]
-[- $fdat{mult3} = "Wert4" ; -]
-[- $fdat{mult4} = "Wert1\tWert2\tWert7" ; -]
-[- $fdat{mult5} = "Wert3" ; -]
-
- <input type="checkbox" value="Wert1" name="mult2" checked>
- <input type="checkbox" value="Wert1" name="mult2">
- <input type="checkbox" value="Wert2" name="mult2" checked>
- <input type="checkbox" value="Wert2" name="mult2">
- <input type="checkbox" value="Wert3" name="mult2" checked>
- <input type="checkbox" value="Wert3" name="mult2">
- <input type="checkbox" value="Wert4" name="mult2" checked>
- <input type="checkbox" value="Wert4" name="mult2">
- <input type="checkbox" value="Wert5" name="mult2" checked>
- <input type="checkbox" value="Wert5" name="mult2">
- <input type="checkbox" value="Wert6" name="mult2" checked>
- <input type="checkbox" value="Wert6" name="mult2">
- <input type="checkbox" value="Wert7" name="mult2" checked>
- <input type="checkbox" value="Wert7" name="mult2">
-
-
- <input type="checkbox" value="Wert1" name="mult3" checked>
- <input type="checkbox" value="Wert1" name="mult3">
- <input type="checkbox" value="Wert2" name="mult3" checked>
- <input type="checkbox" value="Wert2" name="mult3">
- <input type="checkbox" value="Wert3" name="mult3" checked>
- <input type="checkbox" value="Wert3" name="mult3">
- <input type="checkbox" value="Wert4" name="mult3" checked>
- <input type="checkbox" value="Wert4" name="mult3">
- <input type="checkbox" value="Wert5" name="mult3" checked>
- <input type="checkbox" value="Wert5" name="mult3">
- <input type="checkbox" value="Wert6" name="mult3" checked>
- <input type="checkbox" value="Wert6" name="mult3">
- <input type="checkbox" value="Wert7" name="mult3" checked>
- <input type="checkbox" value="Wert7" name="mult3">
-
- <select name="mult2">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="mult3">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="mult4">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="mult5">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="Wert8">Wert8</option>
- </select>
-
-
- [- $fdat{mycheck} = 'N' -]
- <input type=checkbox name=mycheck value=N checked>
-
- <select name="esc">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="a<b">a<b</option>
- <option value="a>b">a<b</option>
- <option value="Wert8">Wert8</option>
- </select>
-
- <select name="escmult">
- <option value="Wert1">Wert1</option>
- <option value="Wert2">Wert2</option>
- <option value="Wert3">Wert3</option>
- <option value="Wert4">Wert4</option>
- <option value="Wert5">Wert5</option>
- <option value="Wert6">Wert6</option>
- <option value="Wert7">Wert7</option>
- <option value="a<b">a<b</option>
- <option value="a>b">a>b</option>
- <option value="Wert8">Wert8</option>
- </select>
-
-optRawInput is now: [+ $optRawInput +] <BR>
-optRawInput is set now to: [+ $optRawInput = 1 +] <BR>
-optRawInput is now: [+ $optRawInput +] <BR>
-
- <input type="text" name="feld1" value="Wert1">
- <input type="text" name="feld2">
- <input type="text" size=10 name="feld3">
- <input type="text" name="feld4" size=10>
-
- <input type="text" name="feld5" value="Wert5">
- <input type="text" name="feld6">
- <input type="text" size=10 name="feld7">
- <input type="text" name="feld8" size=10>
-
- <input type="text" name="feld1" value="Wert<1">
- <input type="text" name="feld5" value="Wert<5">
-
- <p><input type="submit" name="Search" value="Absenden"></p>
</form>
</body>
1.2 +1 -9 embperl/test/html/match/div.htm
Index: div.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/match/div.htm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- div.htm 1998/07/14 20:11:25 1.1
+++ div.htm 2000/09/14 05:53:22 1.2
@@ -170,20 +170,12 @@
<table border="2" width="100%">
<tr>
- <th>1</th>
- <th>2</th>
- <th>3</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
<table border="2" width="100%">
<tr>
- <th>[+ $b[2][$col] +]</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
@@ -203,7 +195,7 @@
<P>[+ $HTML::Embperl::VERSION +]<P>
-<P>[+ $tabmode +]<P>
+<P>[+ $tabmode || 17 +]<P>
<P>[+ local $tabmode = 1 +]<P>
<P>
1.2 +1 -9 embperl/test/html/nph/div.htm
Index: div.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/nph/div.htm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- div.htm 1998/07/14 20:11:21 1.1
+++ div.htm 2000/09/14 05:53:23 1.2
@@ -170,20 +170,12 @@
<table border="2" width="100%">
<tr>
- <th>1</th>
- <th>2</th>
- <th>3</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
<table border="2" width="100%">
<tr>
- <th>[+ $b[2][$col] +]</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
@@ -203,7 +195,7 @@
<P>[+ $HTML::Embperl::VERSION +]<P>
-<P>[+ $tabmode +]<P>
+<P>[+ $tabmode || 17 +]<P>
<P>[+ local $tabmode = 1 +]<P>
<P>
1.2 +1 -9 embperl/test/html/ofunc/div.htm
Index: div.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/ofunc/div.htm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- div.htm 1998/07/14 20:11:25 1.1
+++ div.htm 2000/09/14 05:53:23 1.2
@@ -170,20 +170,12 @@
<table border="2" width="100%">
<tr>
- <th>1</th>
- <th>2</th>
- <th>3</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
<table border="2" width="100%">
<tr>
- <th>[+ $b[2][$col] +]</th>
- </tr>
- <tr>
<td>[+ $a[$row][$col] +] </td>
</tr>
</table>
@@ -203,7 +195,7 @@
<P>[+ $HTML::Embperl::VERSION +]<P>
-<P>[+ $tabmode +]<P>
+<P>[+ $tabmode || 17 +]<P>
<P>[+ local $tabmode = 1 +]<P>
<P>
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
