XML 파일 편집 - 문자열을 찾은 다음 텍스트 블록을 삭제하고/문자열을 찾은 다음 새 텍스트 블록을 삽입합니다.

Question 1

~을 위한ㅏPOSIX sed및 head유틸리티는 물론 일반in문서:

{   sed  -ne'/^<ric id="AUG03250639E=YBAU">$/q;p'
    head -n21 >/dev/null
    cat
}   <in >out

Answer

~을 위한ㅏPOSIX sed및 head유틸리티는 물론 일반in문서:

{   sed  -ne'/^<ric id="AUG03250639E=YBAU">$/q;p'
    head -n21 >/dev/null
    cat
}   <in >out

Question 2

구문 분석 및/또는 조작이라는 사실 외에도정규 표현식이 포함된 xml기껏해야 오해의 소지가 있지만(조심하면 이렇게 간단한 것도 효과가 있을 수 있지만) 거의 옳습니다.

GNU sed 사용:

sed –i -e '/<ric id="AUG03250639E=YBAU">/,+21d'  a.xml

-ised가 ( ) 옵션을 지원하지 않는 경우 --in-place임시 파일을 사용하여 이 작업을 수행할 수 있습니다(sed가 뒤에서 작동하는 방식입니다).

TF=$(mktemp)
sed -e '/<ric id="AUG03250639E=YBAU">/,+21d'  a.xml > "$TF" && mv "$TF" a.xml

시도하는 것처럼 셸에서 파일을 읽고 출력을 해당 파일로 리디렉션할 수 없습니다. 셸이 가장 먼저 하는 일은 파일을 덮어써서 비워 만드는 것인데, 이는 sed 스크립트가 실행되기 전에 발생합니다.

보다 복잡한 XML 구문 분석 작업의 경우 쉘 스크립트의 XML 구문 분석기를 사용 xmlstarlet하거나 Perl 또는 Python(또는 생각할 수 있는 거의 모든 언어)용 XML 구문 분석 라이브러리 중 하나를 사용하세요.

Answer

구문 분석 및/또는 조작이라는 사실 외에도정규 표현식이 포함된 xml기껏해야 오해의 소지가 있지만(조심하면 이렇게 간단한 것도 효과가 있을 수 있지만) 거의 옳습니다.

GNU sed 사용:

sed –i -e '/<ric id="AUG03250639E=YBAU">/,+21d'  a.xml

-ised가 ( ) 옵션을 지원하지 않는 경우 --in-place임시 파일을 사용하여 이 작업을 수행할 수 있습니다(sed가 뒤에서 작동하는 방식입니다).

TF=$(mktemp)
sed -e '/<ric id="AUG03250639E=YBAU">/,+21d'  a.xml > "$TF" && mv "$TF" a.xml

시도하는 것처럼 셸에서 파일을 읽고 출력을 해당 파일로 리디렉션할 수 없습니다. 셸이 가장 먼저 하는 일은 파일을 덮어써서 비워 만드는 것인데, 이는 sed 스크립트가 실행되기 전에 발생합니다.

보다 복잡한 XML 구문 분석 작업의 경우 쉘 스크립트의 XML 구문 분석기를 사용 xmlstarlet하거나 Perl 또는 Python(또는 생각할 수 있는 거의 모든 언어)용 XML 구문 분석 라이브러리 중 하나를 사용하세요.

Question 3

XML을 구문 분석하는 데 정규식을 사용하지 마세요. 더럽습니다. 쉽게 깨지고 부서지기 쉬운 코드를 생성합니다. 줄 수와 같이 문제를 일으킬 수 있는 많은 것들이 있습니다. 요소의 형식을 XML로 지정하는 것은 완벽하게 유효합니다.

<calculation name="AB" field="SEC_YLD_1" />

또는:

<calculation
    field="SEC_YLD_1"
    name="AB"
/>

및 기타 다양한 옵션 - 모두 의미상 동일하지만... 동일한 정규식과 일치하지 않습니다.

예를 들어 파서를 사용하면 매우 간단합니다. 이 작업을 쉽게 수행할 수 있는 방법이 perl있습니까 ?XML::Twig

삭제:

#!/usr/bin/env perl
use strict;
use warnings;
use XML::Twig;

my $twig = XML::Twig -> parsefile ( 'your_file.xml' );

$_ -> delete for $twig -> get_xpath('//ric[@id="AUG03250639E=YBAU"]');

$twig -> set_pretty_print('indented');
$twig -> print;

참고 - 중복된 항목이 있으면 제거하세요.

이제 새 항목을 만듭니다. 복사하고 수정하려는 것 같습니다. 따라서:

#!/usr/bin/env perl
use strict;
use warnings;
use XML::Twig;

my $twig = XML::Twig -> parsefile ( 'your_file.xml' );

#find one to copy - this will just get the first 'ric' element. 
my $ric_to_copy = $twig -> get_xpath('//ric',0); 
#copy it
my $new_ric = $ric_to_copy -> copy;
#alter the new one
$new_ric -> set_att('id', 'BBBBB=YBAU' );
#paste it
$new_ric -> paste ( 'last_child', $ric_to_copy->parent);
$twig -> set_pretty_print('indented');
$twig -> print;

이제 STDOUT을 읽고 인쇄합니다. 특정 파일로 인쇄할 수 있습니다.

my ( $output, '>', 'new.xml') or die $!;
print {$output} $twig -> sprint;
close ( $output );

Answer