[###### sub 1 #####]
[$sub txt1$]
*txt*
*txt* Here goes some normal html text
*txt*
[$endsub$]
[###### sub 2 #####]
[$sub txt2$]
*txt2*
*txt2* Here goes some normal html text
*txt2*
[- txt1 -]
*txt2* after txt1
[$endsub$]
[###### sub 3 #####]
[$sub txt3$]
[- txt2 -]
*txt3* after txt3
[$endsub$]
[$sub tabrow $]
| [+ $_[0] +] |
[$endsub$]
Tests for Embperl - Embperl sub Metacommand 2
*1
[- txt1 -]
*2
[- txt2 -]
*3
[- txt1 -]
[- txt2 -]
*4
[- txt1 ; txt2 -]
[- txt1 ; txt2 -]
----> txt3
[- txt3 -]
========================================================
[- tabrow(1) -]
[$if (1) $]
[- tabrow(2) -]
[$else$]
[- tabrow(3) -]
[$endif$]
[- tabrow(4) -]
-> 5
[- tabrow(5) -]