从已知的几个数组中输出另外一个格式的文件问题，想紧急请教大家！！！谢谢

有个问题想请教大家：

如果已经从一个文件中抽出所需要的info，并且用这些info输出一个有规定格式的整个文件

例如已经有三个数组:
　@a=qw("b","c","_d_e","f")
   @a1=qw("b1","c","_d_e","f")
   @a2=qw("b2","c","_d_e","f")

需要输出一个完整的文件格式是
　　test   c　(d,e,f)
      b    b_test  (.d(d), .e(e), .f(1));
      b1  b1_test (.d(1), .e(e), .f(2));
      b2  b2_test (.d(2), .e(e), .f(f));
      end

我先把＂_d_e＂用split分开，组成包含在@a,@a1,@a2这三个数组分别关联的一个数组，便于调用
但是我不是很清楚用何种循环的表达方式使之能输出上面那种格式的文件．
希望大家能给我一些例子，想法和思路，多谢大家了：）
刚学了perl没多久，谢谢大家！！！

由于意思和规律都没有说清楚，所以到现在没有一个人回复吧~

在写Verilog代码?