[- @regs = () ; $regs[0]{Id} = 'Pfalz' ; $regs[1]{Id} = 'Rheinhessen' ; @kats = () ; $kats[0]{Id} = 'Kultur' ; $kats[1]{Id} = 'Sport' ; $kats[2]{Id} = 'Veranstaltungen' ; -]

 

[- $fdat{dec} = 'a & b' -]
[+$regs[$row]{Id}+]

[+$kats[$row]{Id}+]
ks = [+ @ks = sort keys %idat ; "@ks" +]

[+ $ks[$i=$row] +][+ $idat{$ks[$i] || ''} +]
ks = [+ @ks = sort keys %idat ; "@ks" +]

[+ $ks[$i=$row] +][+ $idat{$ks[$i] || ''} +]