将文件的多行作为数组的单个元素

Question

文本文件包含

pChainCtrl 
pNewRoute 
pCurrRoute 

pChainCtrl 
pNewRoute 
pCurrRoute 
pMod

pChainCtrl 
pNewRoute 

是否可以将元素集放入像

这样的数组中

array a[0] = pChainCtrl 
             pNewRoute 
             pCurrRoute 

a[1] =      pChainCtrl 
            pNewRoute 
            pCurrRoute 
            pMod

Answer 1

您可以将输入记录分隔符$/更改为""（即local $/ = "";）以将输入分割为空行（有关详细信息，请参阅perldoc perlvar）。

Answer 2

试试这个：

#!/usr/bin/perl -w

open my $fh, "data.txt" or die;
my $file = do { local $/; <$fh> };
close $fh;

my @a = split /\n{2,}/, $file;