2

したがって、コードで URL を定義し、それをコンテンツに割り当てたので、html ファイル全体を に保存する必要があります$content。STDINから読み取ると、自動的に行ごとに進みますが、ここではそうではないようです。その$end == 1部分は、while ループを停止するタイミングを指定するだけです。私はPerlを初めて使用するので、おそらく構文のほんの少しの問題ですが、二重の等号を使用したり$line = $content、ループ内の部分を移動したりしてみましたが、まだ修正できません. どんな助けでも大歓迎です！ありがとう！

my $content = get $url;
while(my $line = $content && $end == 1) {
    #code to edit line
}
4

2 に答える 2

1

これを試して：

my @content = get $url;
foreach my $line (@content) {
    ...
}
于 2012-12-11T00:09:09.947 に答える
1 
while ($content =~ /\G(.*\n|.+\z)/g) {
   my $line = $1;
   ...
}

に関しては$end、変数の名前が不適切であるか、ロジックが逆になっています。とにかく、そのような構成はまったく不要です。そのまま使用してlastください。

于 2012-12-11T01:02:33.183 に答える