Shell Programming and Scripting

while IFS=\| read -a WORD$((++i)); do eval echo -e WORD$i "\\\t" $\{\#WORD$i[@]} "\\\t" $\{WORD$i[@]}; done < file
WORD1      9      line1 111 22 33 44 55 aa bb cc
WORD2      13      line2 dd ee ff gg ii jj kk ll mm nn oo pp

$more test.txt
111|22|33|44|55|aa|bb|cc
dd|ee|ff|gg|ii|jj|kk|ll|mm|nn|oo|pp

$more test_script_6.ksh
#! /usr/bin/ksh
WORD=0
i=0
while IFS=$'\|' read -A WORD$((++i)); do
eval echo -e WORD$i "\\\t" $\{#WORD$i[@]} "\\\t" $\{WORD$i[@]}
echo -e "WORD2 WORD2[3]=${WORD2[3]}"
#j=0
#until [[ $j == "$\{#WORD$i[@]}" ]]; do
#echo -e WORD$i WORD$i[$j]=${WORD$i[$j]}
#j=$((j + 1))
#done
;done < test.txt

$./test_script_6.ksh
WORD1    8       111 22 33 44 55 aa bb cc
WORD2 WORD2[3]=
WORD2    12      dd ee ff gg ii jj kk ll mm nn oo pp
WORD2 WORD2[3]=gg

$more test_script_6.ksh
#! /usr/bin/ksh
WORD=0
i=0
while IFS=$'\|' read -A WORD$((++i)); do
eval echo -e WORD$i "\\\t" $\{#WORD$i[@]} "\\\t" $\{WORD$i[@]}
echo -e "WORD2 WORD2[3]=${WORD2[3]}"
j=0
until [[ $j == "$\{#WORD$i[@]}" ]]; do
echo -e WORD$i WORD$i[$j]=${WORD$i[$j]}
j=$((j + 1))
done
;done < test.txt

$ksh -x test_script_6.ksh
+ WORD=0
+ i=0
test_script_6.ksh: line 3: syntax error at line 9: `$' unexpected

$more test_script_8.ksh
#! /usr/bin/ksh

awk 'BEGIN{RS="\n";
FS="|";
}
{
print "<TR>";
for (i = 1; i <= NF; i++)
print "<TD>" $i "</TD>";
print "</TR>";
print "\n";
}' test.txt

$./test_script_8.ksh
<TR>
<TD>111</TD>
<TD>22</TD>
<TD>33</TD>
<TD>44</TD>
<TD>55</TD>
<TD>aa</TD>
<TD>bb</TD>
<TD>cc</TD>
</TR>


<TR>
<TD>dd</TD>
<TD>ee</TD>
<TD>ff</TD>
<TD>gg</TD>
<TD>ii</TD>
<TD>jj</TD>
<TD>kk</TD>
<TD>ll</TD>
<TD>mm</TD>
<TD>nn</TD>
<TD>oo</TD>
<TD>pp</TD>
</TR>