HTML table tag in Embperl

$tabmode = default

Display an two dimensional array with one, two and three columns !
Please take a look at the source in your browser to see the difference
$a[0][0] = '1/1' ;
$a[1][0] = '2/1' ;
$a[1][1] = '2/2' ;
$a[2][0] = '3/1' ;
$a[2][1] = '3/2' ;
$a[2][2] = '3/3' ;

$tabmode = default

a1/1
a2/1 | a2/2
a3/1 | a3/2 | a3/3

1 | 2 | 3
--- | --- | ---
a1/1
a2/1 | a2/2
a3/1 | a3/2 | a3/3

b3/1 | b3/2 | b3/3
--- | --- | ---
a1/1
a2/1 | a2/2
a3/1 | a3/2 | a3/3

b1/1
b2/1 | b2/2
b3/1 | b3/2 | b3/3
a1/1
b1/1
b2/1 | b2/2
b3/1 | b3/2 | b3/3
a2/1 |
b1/1
b2/1 | b2/2
b3/1 | b3/2 | b3/3
a2/2
b1/1
b2/1 | b2/2
b3/1 | b3/2 | b3/3
a3/1 |
b1/1
b2/1 | b2/2
b3/1 | b3/2 | b3/3
a3/2 |
b1/1
b2/1 | b2/2
b3/1 | b3/2 | b3/3
a3/3

b3/1 | b3/2 | b3/3
a3/1 | a3/2 | a3/3

a2/1
a1/1
a3/1
a2/1

Pfalz
Rheinhessen
Kultur
Sport

Pfalz
Rheinhessen
Kultur
Sport
Veranstaltungen

$tabmode=3 + 48 ; $maxcol = 4; $maxrow = 4

a1/1 |  |  |
a2/1 | a2/2 |  |
a3/1 | a3/2 | a3/3 |

$tabmode=1 + 32 ;

a1/1 |
a2/1 | a2/2 |
a3/1 | a3/2 | a3/3 |

optDisableTableScan is now: 0
optDisableTableScan is set now to: 1
optDisableTableScan is now: 1

a1/1

optDisableTableScan is now: 1
optDisableTableScan is set now to: 0
optDisableTableScan is now: 0

a1/1 |
a2/1 | a2/2 |
a3/1 | a3/2 | a3/3 |