从文件中提取一个数

mikiahmikiah

$DATA1 SOURCE='HSPICE' VERSION='C-2009.09 32-BIT'
.TITLE 'fa simulation in hspice'
power_ave        temper           alter#            
  1.598e-04         25.0000           1.0000   

上面是一个名字为input.dat的文件。。需要从这个文件中提取1.598e-04这个数，并输出到另外一个文件output.dat.
请教大家怎样用perl实现啊。。
谢谢。。

zhouquan_y

用shell实现，也就是用一句命令就可以实现：

tail -1  input.dat | awk  '{print $1}' | awk -Fe '{print $1}'   >output.dat    //得到的是1.598
tail -1  input.dat | awk  '{print $1}'                                     >output.dat     //得到的是1.598e-04

mikiahmikiah

回复 2# zhouquan_y


    谢谢。。。