请问怎样将文件定义成列数组？

qinyu2008

请问怎样将下述文件定义成列数组Store 、FIS Type  、Description 等？
Store #    Speed    Direction   FIS Type                                                   Description                                        Timestamp

  0            3 Gbps   D->H         FIS 34 - Status: 0x50 -   DRDY                  LBA = 0x0000001  Sec Cnt = 0x01   5190788604 ns
  8            3 Gbps   H->D         FIS 27 - Cmd: 0xEC=IDENTIFY DRIVE       LBA = 0x05AA501  Sec Cnt = 0x01    6679982484 ns
  20          3 Gbps   H->D         FIS 27 - Cmd: 0xEF=SET FEATURES          LBA = 0x05AA501  Sec Cnt = 0x0C   6681451468 ns
  28          3 Gbps   D->H         FIS 34 - Status: 0x50 -   DRDY                  LBA = 0x05AA501  Sec Cnt = 0x0C   6681579824 ns
  36          3 Gbps   H->D         FIS 27 - Cmd: 0xEF=SET FEATURES          LBA = 0x05AA501  Sec Cnt = 0x45   6681714584 ns
  44          3 Gbps   D->H         FIS 34 - Status: 0x50 -   DRDY                  LBA = 0x05AA501  Sec Cnt = 0x45   6681897132 ns

__lxmxn__

用正则！

qinyu2008

如题，将该文件定义为列数组。刚学习perl，了解可以实现，但是不大会用，总出错，还在调试中。谢谢~~

longbow0

如果不同列之间用 "\t" 分隔，

split(/\t/, $line)

就可以了。