File: hidden.htm

package info (click to toggle)
libembperl-perl 2.5.0-4
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 6,200 kB
  • sloc: ansic: 21,387; perl: 14,496; cpp: 467; xml: 49; makefile: 32; sh: 24
file content (95 lines) | stat: -rw-r--r-- 1,886 bytes parent folder | download | duplicates (11)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
<html>

<head>
<title>Test for hidden meta command</title>
</head>


[-
$regs{feld1} = 'Pfalz' ;
$regs{feld2} = 'Rhein"hessen"&Pfalz' ;

$kats{feld1} = 'Kultur' ;

$sort[0] = 'feld4' ;
$sort[1] = 'feld3' ;
$sort[2] = 'feld2' ;
$sort[3] = 'feld1' ;

-]

<form action="inhalt.htm" method="POST">
    <p>&nbsp;</p>

	a1[$hidden$]
	a2[$hidden regs $]
	a3[$hidden regs, kats $]
	a4[$hidden regs, kats, sort $]
	a5[$hidden %regs $]
	a6[$hidden %regs, %kats $]
	a7[$hidden %regs, %kats, @sort $]
	a8[$hidden %fdat, %idat, @sort $]
    
	<input type="text" name="feld1">

	b1[$hidden$]
	b2[$hidden regs $]
	b3[$hidden regs, kats $]
	b4[$hidden regs, kats, sort $]
	b5[$hidden %regs $]
	b6[$hidden %regs, %kats $]
	

    <select name="feld2"><option value="Wert1">rlp</option></select>

	s1[$hidden$]

    <select name="feld2"><option value="Wert1"><option value="Wert2">rlp</option></select>
    
	c1[$hidden$]
	c2[$hidden regs $]
	c3[$hidden regs, kats $]
	c4[$hidden regs, kats, sort $]
	c5[$hidden %regs $]
	c6[$hidden %regs, %kats $]

	<input type="text" name="feld3">
    <input type="text" name="feld4">
    
	d1[$hidden$]
	d2[$hidden regs $]
	d3[$hidden regs, kats $]
	d4[$hidden regs, kats, sort $]
	d5[$hidden %regs $]
	d6[$hidden %regs, %kats $]
	d7[$hidden %regs, %kats, @sort $]


	[- $fdat{empty1} = undef ; push @ffld, 'empty1' ; -]
	[- $fdat{empty2} = '' ;    push @ffld, 'empty2' ; -]

	e1[$hidden $]
	e2[$hidden %fdat, %idat, @ffld $]
	optNoHiddenEmptyValue is now [+ $optNoHiddenEmptyValue +]
	[- $optNoHiddenEmptyValue = 1 -]
	optNoHiddenEmptyValue is now [+ $optNoHiddenEmptyValue +]
	e1[$hidden $]
	e2[$hidden %fdat, %idat, @ffld $]
	[- $optNoHiddenEmptyValue = 0 -]
	optNoHiddenEmptyValue is now [+ $optNoHiddenEmptyValue +]
	e1[$hidden $]
	e2[$hidden %fdat, %idat, @ffld $]

</form>


[$foreach $i (1..4)$]
<form>
	l1[$hidden $]
</form>
[$endforeach$]



</body>
</html>