File: lists.htm

package info (click to toggle)
libembperl-perl 2.5.0-4%2Bdeb8u1
  • links: PTS, VCS
  • area: main
  • in suites: jessie
  • size: 6,200 kB
  • ctags: 3,072
  • sloc: ansic: 21,387; perl: 14,496; cpp: 467; xml: 49; makefile: 32; sh: 24
file content (110 lines) | stat: -rw-r--r-- 2,544 bytes parent folder | download | duplicates (10)
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
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
<html>

<head>
<meta http-equiv="Content-Type"
content="text/html; charset=iso-8859-1">
<title>Lists</title>
</head>

<body bgcolor="#FFFFFF">

[- @k = (1, 2, 3, 4, 5, 6) -]
[- @v = ('A', 'B', 'C', 'D', 'E', 'F') -]
</p>
<hr>
<P>OL Tag</P>
<ol>
    <li>[+ $k[$row] +] = [+ $v[$row] +]</li>
</ol>

<hr>
<P>UL Tag</P>
<ul>
    <li>[+ $k[$row] +] = [+ $v[$row] +]</li>
</ul>

<hr>
<form method="POST">
  <P>Select Tag</P>

    If you request this document with list.htm?sel=n you can specify that the
    nth element of the dropdownlist is initialy selected
    

    <p><select name="D1" size="1">
        <option value="[+ $v[$row] +]" [+ $row + 1 == $fdat{sel}?'SELECTED':'' +]>[+ $k[$row] +]</option>
    </select></p>
</form>


<form method="POST">
  <P>Select Tag</P>

    If you request this document with list.htm?sel1=x you can specify that the
    element of the dropdownlist is initialy selected
    

    <p><select name="SEL1">
        <option value="[+ $v[$row] +]">[+ $k[$row] +]</option>
    </select></p>
</form>

<form method="POST">
  <P>Select Tag</P>

    If you request this document with list.htm?sel2=x you can specify that the
    element of the dropdownlist is initialy selected
    

    <p><select name="SEL2">
        <option selected value="[+ $v[$row] +]">[+ $k[$row] +]</option>
        <option value="[+ $v[$row] +]" selected>[+ $k[$row] +]</option>
        <option value="[+ $v[$row] +]" selected size=5>[+ $k[$row] +]</option>
    </select></p>
    <p><select name="SEL3">
        <option selected value="[+ $v[$row] +]">[+ $k[$row] +]</option>
        <option value="[+ $v[$row] +]" selected>[+ $k[$row] +]</option>
        <option value="[+ $v[$row] +]" selected size=5>[+ $k[$row] +]</option>
    </select></p>
    <p><select name="SEL4">
        <option selected value="aa">aaaa</option>
        <option value="bb" selected>bbbb</option>
        <option value="cc" selected size=5>cccc</option>
        <option value="dd">aaaa</option>
        <option value="ee">bbbb</option>
        <option value="cc" size=5>cccc</option>
    </select></p>
</form>



<hr>
<P>DL Tag</P>
<dl>
    <dt>[+ $k[$row] +]</dt>
    <dd>[+ $v[$row] +]</dd>
</dl>

<hr>
<P>MENU Tag</P>
<menu>
    <li>[+ $k[$row] +] = [+ $v[$row] +]</li>
</menu>

<hr>
<P>DIR Tag</P>
<dir>
    <li>[+ $k[$row] +] = [+ $v[$row] +]</li>
</dir>


    [- $articles = [ 'one', 'two' ] -]
    <ul class="articles_by_author">
      [- $dn = $articles->[$row]; -]
      <li><a href="kb.epl?-dn=[+ $dn +]">[+ uc($dn) +]</a></li>
    </ul>



</body>
</html>