Tôi có một tệp có -|dấu phân cách sau mỗi phần ... cần tạo các tệp riêng biệt cho từng phần bằng unix.

ví dụ về tệp đầu vào

wertretr
ewretrtret
1212132323
000232
-|
ereteertetet
232434234
erewesdfsfsfs
0234342343
-|
jdhg3875jdfsgfd
sjdhfdbfjds
347674657435
-|

Kết quả mong đợi trong Tệp 1

wertretr
ewretrtret
1212132323
000232
-|

Kết quả mong đợi trong Tệp 2

ereteertetet
232434234
erewesdfsfsfs
0234342343
-|

Kết quả mong đợi trong Tệp 3

jdhg3875jdfsgfd
sjdhfdbfjds
347674657435
-|

Một lớp lót, không cần lập trình. (ngoại trừ regexp, v.v.)

csplit --digits=2  --quiet --prefix=outfile infile "/-|/+1" "{*}"

đã thử nghiệm trên: csplit (GNU coreutils) 8.30

Lưu ý về việc sử dụng trên Apple Mac

"Đối với người dùng OS X, hãy lưu ý rằng phiên bản csplitđi kèm với hệ điều hành này không hoạt động. Bạn sẽ muốn phiên bản trong coreutils (có thể cài đặt qua Homebrew), được gọi là gcsplit". - @Danial

"Chỉ cần nói thêm, bạn có thể có được phiên bản cho OS X hoạt động (ít nhất là với High Sierra). Bạn chỉ cần chỉnh sửa args một chút csplit -k -f=outfile infile "/-\|/+1" "{3}". Các tính năng dường như không hoạt động "{*}", tôi phải nói rõ về số lượng dấu phân tách và cần thêm -kđể tránh nó xóa tất cả các tệp ngoại lai nếu không thể tìm thấy dấu phân tách cuối cùng. Ngoài ra, nếu muốn --digits, bạn cần sử dụng -nthay thế. " - @Pebbl

awk '{f="file" NR; print $0 " -|"> f}' RS='-\\|'  input-file

Giải thích (đã chỉnh sửa):

RSlà dấu phân tách bản ghi và giải pháp này sử dụng phần mở rộng gnu awk cho phép nó có nhiều hơn một ký tự. NRlà con số kỷ lục.

Câu lệnh print in một bản ghi theo sau " -|"vào một tệp có chứa số bản ghi trong tên của nó.

Debian có csplit, nhưng tôi không biết liệu điều đó có phổ biến với tất cả / hầu hết / các bản phân phối khác hay không. Tuy nhiên, nếu không, sẽ không quá khó để truy tìm nguồn và biên dịch nó ...

Tôi đã giải quyết một vấn đề hơi khác, trong đó tệp chứa một dòng có tên mà văn bản theo sau sẽ đến. Mã perl này thực hiện mẹo cho tôi:

#!/path/to/perl -w

#comment the line below for UNIX systems
use Win32::Clipboard;

# Get command line flags

#print ($#ARGV, "\n");
if($#ARGV == 0) {
    print STDERR "usage: ncsplit.pl --mff -- filename.txt [...] \n\nNote that no space is allowed between the '--' and the related parameter.\n\nThe mff is found on a line followed by a filename.  All of the contents of filename.txt are written to that file until another mff is found.\n";
    exit;
}

# this package sets the ARGV count variable to -1;

use Getopt::Long;
my $mff = "";
GetOptions('mff' => \$mff);

# set a default $mff variable
if ($mff eq "") {$mff = "-#-"};
print ("using file switch=", $mff, "\n\n");

while($_ = shift @ARGV) {
    if(-f "$_") {
    push @filelist, $_;
    } 
}

# Could be more than one file name on the command line, 
# but this version throws away the subsequent ones.

$readfile = $filelist[0];

open SOURCEFILE, "<$readfile" or die "File not found...\n\n";
#print SOURCEFILE;

while (<SOURCEFILE>) {
  /^$mff (.*$)/o;
    $outname = $1;
#   print $outname;
#   print "right is: $1 \n";

if (/^$mff /) {

    open OUTFILE, ">$outname" ;
    print "opened $outname\n";
    }
    else {print OUTFILE "$_"};
  }

Lệnh sau phù hợp với tôi. Hy vọng nó giúp.

awk 'BEGIN{file = 0; filename = "output_" file ".txt"}
    /-|/ {getline; file ++; filename = "output_" file ".txt"}
    {print $0 > filename}' input

Bạn cũng có thể sử dụng awk. Tôi không quen thuộc lắm với awk, nhưng những điều sau đây dường như hiệu quả với tôi. Nó tạo ra part1.txt, part2.txt, part3.txt và part4.txt. Xin lưu ý rằng tệp partn.txt cuối cùng mà tệp này tạo ra trống. Tôi không chắc làm thế nào để khắc phục điều đó, nhưng tôi chắc chắn rằng nó có thể được thực hiện với một chút điều chỉnh. Bất kỳ đề nghị bất cứ ai?

tệp awk_pattern:

BEGIN{ fn = "part1.txt"; n = 1 }
{
   print > fn
   if (substr($0,1,2) == "-|") {
       close (fn)
       n++
       fn = "part" n ".txt"
   }
}

lệnh bash:

awk -f awk_pattern input.file

Đây là một tập lệnh Python 3 chia một tệp thành nhiều tệp dựa trên tên tệp được cung cấp bởi các dấu phân cách. Tệp đầu vào mẫu:

# Ignored

######## FILTER BEGIN foo.conf
This goes in foo.conf.
######## FILTER END

# Ignored

######## FILTER BEGIN bar.conf
This goes in bar.conf.
######## FILTER END

Đây là kịch bản:

#!/usr/bin/env python3

import os
import argparse

# global settings
start_delimiter = '######## FILTER BEGIN'
end_delimiter = '######## FILTER END'

# parse command line arguments
parser = argparse.ArgumentParser()
parser.add_argument("-i", "--input-file", required=True, help="input filename")
parser.add_argument("-o", "--output-dir", required=True, help="output directory")

args = parser.parse_args()

# read the input file
with open(args.input_file, 'r') as input_file:
    input_data = input_file.read()

# iterate through the input data by line
input_lines = input_data.splitlines()
while input_lines:
    # discard lines until the next start delimiter
    while input_lines and not input_lines[0].startswith(start_delimiter):
        input_lines.pop(0)

    # corner case: no delimiter found and no more lines left
    if not input_lines:
        break

    # extract the output filename from the start delimiter
    output_filename = input_lines.pop(0).replace(start_delimiter, "").strip()
    output_path = os.path.join(args.output_dir, output_filename)

    # open the output file
    print("extracting file: {0}".format(output_path))
    with open(output_path, 'w') as output_file:
        # while we have lines left and they don't match the end delimiter
        while input_lines and not input_lines[0].startswith(end_delimiter):
            output_file.write("{0}\n".format(input_lines.pop(0)))

        # remove end delimiter if present
        if not input_lines:
            input_lines.pop(0)

Cuối cùng, đây là cách bạn chạy nó:

$ python3 script.py -i input-file.txt -o ./output-folder/

Sử dụng csplitnếu bạn có nó.

Nếu bạn không, nhưng bạn có Python ... đừng sử dụng Perl.

Lười đọc tệp

Tệp của bạn có thể quá lớn để chứa tất cả trong bộ nhớ cùng một lúc - đọc từng dòng có thể thích hợp hơn. Giả sử tệp đầu vào có tên là "samplein":

$ python3 -c "from itertools import count
with open('samplein') as file:
    for i in count():
        firstline = next(file, None)
        if firstline is None:
            break
        with open(f'out{i}', 'w') as out:
            out.write(firstline)
            for line in file:
                out.write(line)
                if line == '-|\n':
                    break"

cat file| ( I=0; echo -n "">file0; while read line; do echo $line >> file$I; if [ "$line" == '-|' ]; then I=$[I+1]; echo -n "" > file$I; fi; done )

và phiên bản định dạng:

#!/bin/bash
cat FILE | (
  I=0;
  echo -n"">file0;
  while read line; 
  do
    echo $line >> file$I;
    if [ "$line" == '-|' ];
    then I=$[I+1];
      echo -n "" > file$I;
    fi;
  done;
)

Đây là loại sự cố tôi đã viết phân tách ngữ cảnh cho: http://stromberg.dnsalias.org/~strombrg/context-split.html

$ ./context-split -h
usage:
./context-split [-s separator] [-n name] [-z length]
        -s specifies what regex should separate output files
        -n specifies how output files are named (default: numeric
        -z specifies how long numbered filenames (if any) should be
        -i include line containing separator in output files
        operations are always performed on stdin

Đây là một mã perl sẽ làm điều đó

#!/usr/bin/perl
open(FI,"file.txt") or die "Input file not found";
$cur=0;
open(FO,">res.$cur.txt") or die "Cannot open output file $cur";
while(<FI>)
{
    print FO $_;
    if(/^-\|/)
    {
        close(FO);
        $cur++;
        open(FO,">res.$cur.txt") or die "Cannot open output file $cur"
    }
}
close(FO);