再次请教一个记录修改问题，谢谢！

cnwillow

假定一个记录如下（各个记录的各个域内容不相同）：

aa   bb   cc   dd   ee
bd   ac   ie    te    zq

现在需要将其变成下面的记录：

1:aa   2:bb   3:cc   4:dd   5:ee
1:bd   2:ac    3:ie   4:te    5:zq

既在每个field前加上对应的编号。

谢谢！
//bow

cnwillow

已解决,方法比较笨，欢迎改进！

while($temp=<FH_in>
{
    @tempArray = split(/ /, $temp);

   foreach $i(0..4)
   {
       print FH_out "$itempArray[$i]";
     }
   
    print FH_out "\n";
}