Question

我对我的指挥力有两点读物,第一个是方案Im写作所要搜索的一系列字,第二个是文件,其中载有待找到的字句。因此,例如,我的指挥官立即读到网上Scan。

现在,我看不到这些印刷材料中的任何一种,但我很难查阅网页的内容,因此,我可以定期发表言论,删除标题和查阅内容。我认识到,没有定期表达方式,就能够做到这一点,但我需要经常表示:

I can access the html file for printing with no trouble:

open (DATA, $ARGV[1]);
my @file = <DATA>;
print @file;

哪部印刷了html网页的整部代码,但我无法通过定期表述,以便拆除html区块。我仍然收到一个错误,即“一阵列修改了我定期具体表达的在纸上/近文中的参考”。我不敢肯定如何绕过这一天,我试图将阵列变成一个小数,但当时我根本无法从html获得任何数据(而且没有,它只是打印了阵列中的数值数)。

我如何接触阵列的内容,以便我能够利用定期表述来改进预期产出?

Answer 1

象你那样做的是@file=~ s/find/replace/;。你们正在发现这一错误,因为有约束力的经营者左手把狭隘的背景强加于人。缩略语阵列的长度回去,但这一数值只读到。因此,当您的替代品试图进行替换时,就会出现abo。

为了处理档案的所有内容,可使用<条码>。住宿:

foreach my $line (@file) {$line =~ s/find/replace/}

简明扼要如下:

s/find/replace/ for @file;

然而,如果你在超文本档案中经常使用字句,那么你需要多条字眼。以上所述内容是阅读每一行的所有档案,并作为<代码>@file的一个要素加以储存。如果你在阵列上使用一种Perl的迭代控制结构,你将无法与多线相匹配。因此,你应将档案改为单体。然后,可按预期使用<代码>$file =~ s/。

您可暂时清理输入记录分离器$/:

my $file = do {local $/; <DATA>};

一般说来,定期表达是穿透超文本的错误工具,但这种表述像是一种家务劳动,因此在这种情况下,其正当做法是行不通的。

最后,在现代 Perl, 您应使用 open的三种论点形式,其中应使用弹性文件处理和错误核对:

open my $DATA,  < , $ARGV[1] or die "open error: $!";

my $file = do {local $/; <$DATA>};