Perlを使用してパターンに基づいてファイルを複数のファイルに分割する方法は？ [閉鎖]

Question

ここでは、パターンが表示されるたびに新しいファイルが開きます/8/。

$ seq 30 | perl -pe 'BEGIN{open STDOUT, ">", "file" . ++$n}
                     open STDOUT, ">", "file" . ++$n if /8/'
$ ls
file1  file2  file3  file4
$ paste *
1       8       18      28
2       9       19      29
3       10      20      30
4       11      21
5       12      22
6       13      23
7       14      24
        15      25
        16      26
        17      27

Answer 1

ここでは、パターンが表示されるたびに新しいファイルが開きます/8/。

$ seq 30 | perl -pe 'BEGIN{open STDOUT, ">", "file" . ++$n}
                     open STDOUT, ">", "file" . ++$n if /8/'
$ ls
file1  file2  file3  file4
$ paste *
1       8       18      28
2       9       19      29
3       10      20      30
4       11      21
5       12      22
6       13      23
7       14      24
        15      25
        16      26
        17      27

Perlを使用してパターンに基づいてファイルを複数のファイルに分割する方法は？ [閉鎖]

ベストアンサー1

おすすめ記事