Perl 명령 출력을

Question

으로 리디렉션합니다. bash 스크립트에서 각 파일에 대해 다음 Perl 명령을 호출하고 Perl 명령의 출력을 해당 파일로 리디렉션하려고합니다.

Perl 명령은 단순히 removes the comments from the file입니다. 콘솔에 인쇄 할 때 작동하는 것 같습니다. 그러나 각 개별 파일로 출력을 리디렉션하려고하면 파일이 비어있게됩니다. 여기서 내가 뭘 잘못하고 있니?

#!/usr/bin/env bash 

shopt -s globstar 
for file in ./**/*.java; do 
    perl -0pe 's|//.*?\n|\n|g; s#/\*(.|\n)*?\*/##g; s/\n\n+/\n\n/g' "$file" > "$file"; 
done 

Answer 1

출력을 동일한 파일로 리디렉션하려고합니다. 이것은 작동하지 않습니다. 쉘은 먼저 파일을 열어서 파일을 읽으려고 할 때 펄에서 파일을 읽으려고 할 때 아무 것도 출력되지 않으므로 결과가 출력되지 않습니다.

Perl의 -i 옵션을 사용하여 내부 편집을 수행 할 수 있습니다.

perl -i.bak -0pe 's|//.*?\n|\n|g; s#/\*(.|\n)*?\*/##g; s/\n\n+/\n\n/g' "$file" 

이렇게하면 파일을 직접 편집하고 확장명이 .bak 인 파일의 원본을 가질 수 있습니다. 백업이 필요없는 경우 -i.bak