透石问路:能够有更好的方法!

有一文本数据,行数40个,列数56个,文本存储格式如下:
     page=1
I 1  2  3  4  5  6  7   8   9    10  (列字段)
1 0.5 0.8 0.9 1.2 4.3 5.2 16.0 3.4 18.1 9.2
2 0.8 0.9 0.3 0.5 0.4 0.9 1.2 0.5 0.8 0.9
.
.
.
40 1.2 1.5 1.6 0.8 0.7 0.3 0.1 1.1 0.3 1.5

I 11  12  13  14  15  16  17  18  19  20   
1 0.7 0.6 0.3 0.8 0.8 0.1 1.5 1.7 0.9 1.2
.
.
.
40 0.8 0.9 1.2 1.5 1.3 1.0 0.7 0.5 0.4 0.2

I 51 52 53 54 55 5 56
.
.
.
             page==3
.
.
.

题目是将相同行的数据合并成一行,我的gawk脚本如下:
BEGIN{page=1}
/page/{if(page==1)
      print $0
    else
      {for(i=1;i<=40;i++)
       {print myarray
        myarray=""
       }
       print $0
      }
    page++
   }
!/page/{lie=$1
     if(NF==11)
       myarray[lie]=myarray[lie]"  "$2"  "$3"  "$4"  "$5"  "$6"  "$7"  "$8"  "$9"  "$10"  "$11
     else
       myarray[lie]=myarray[lie]"  "$2"  "$3"  "$4"  "$5"  "$6
    }
END{for(i=1;i<=40;i++)
       {print myarray
       }
   }
请高手看看,程序是否能在简短一些,效率在高一些?　　　　　　

不理解 　　　　　　

我没有说清除!!!!