-4

複数のドーター ファイルを作成したいマスター ファイルがあります。マスター ファイルには、変更してから別のファイルに保存したい数行のテキストが含まれています。新しいファイルを別のファイル名に保存するたびに、これを複数回実行したいと考えています。

たとえば、私のマスター ファイルにはいくつかの REPLACETEXT があり、これを NEWTEXT に変更して、ファイル全体を NEWTEXT1.txt に保存したいと考えています。次に、NEWTEXT2 に対してこれを繰り返し、NEWTEXT2.txt に保存します。もう一度すすぎ、さらに100回ほど繰り返します。

perl と loops を使った簡単な方法があると思いますが、私の限られた知識ではうまくいきませんでした。

4

1 に答える 1

0

他の人が示唆したように、いくつかの基本的な Perl トレーニングを受けることを強くお勧めします。

ただし、この簡単なコードは機能するはずです

#!/usr/bin/perl -w

my @keywords=('NEWTEXT1','NEWTEXT2','NEWTEXT2');
open(FILE,"Master.txt");
foreach (@keywords)
{
    open(NEWFILE,">$_.txt");
    seek (FILE, 0, 0);
    foreach $line (<FILE>)
    {
         $line=~s/REPLACETEXT/$_/g;
         printf NEWFILE ("$line");
    }
    close(NEWFILE);
}
close(FILE);
于 2012-10-12T16:26:29.957 に答える