File: incsub.htm

package info (click to toggle)

libembperl-perl 2.0rc3-1

links: PTS
area: main
in suites: sarge
size: 5,688 kB
ctags: 5,161
sloc: ansic: 20,422; perl: 10,064; makefile: 5,134; cpp: 467; xml: 49; sh: 14

file content (20 lines) | stat: -rwxr-xr-x 296 bytes

parent folder | download | duplicates (15)

[+ "Start include" +]
[- @a = ('s1', 's2', 's3') -]
<table>
    <tr>
	<td>
	    [+ "$param[0] - " +][+ $a[$col] +]
	</td>
    </tr>
</table>
Parameters:<BR>
<table>
    <tr>
	<td>
	    [+ $param[$col] +]
	</td>
    </tr>
</table>
p0	    [+ $param[0] +]
p1	    [+ $param[1] +]
[+ "End include" +]