`make '오류를 잡는 중 문제가 발생했습니다

Question

이 perl 스크립트의 목적은 먼저 .cpp 파일을 리팩터링 한 다음 전체 패키지를 컴파일하는 것입니다. 모두 잘되면 다음 파일로 이동하고 그렇지 않으면 backup 디렉토리의 원본 파일을 바꿉니다. 다음은 패키지의 makefile을 실행하기위한 펄 스크립트입니다.

@lcpp = `ls *.cpp`; 
chomp(@lcpp); 
foreach (@lcpp) { 
print "processing file $_ ..."; 
`cp demac_dir/$_ .`; 
if(2 == `make`) { 
    print "\n\t\t\tError in the file\n"; 
    `cp backup/$_ .`; 
    print "reverting back to the original file and building the package again"; 
    `make`; 
} 
else {#when successfully compiled 
    print "successfully compiled the package with file $_"; 
} 
} 

컴파일러 오류가있는 '리팩터링 된'파일이 생길 때까지 스크립트가 실행됩니다. 스크립트가 make에 의해 반환 된 오류를 캡처 할 수 없습니다. 또는 나는 뭔가를 놓친다.

Answer 1

system()을 사용하여 make를 호출하면 make가 성공했는지 여부를 확인할 수 있습니다. perldoc -f system 참조 :

 
    @args = ("command", "arg1", "arg2"); 
    system(@args) == 0 
     or die "system @args failed: $?" 

You can check all the failure possibilities by inspecting $? 
like this: 

    if ($? == -1) { 
     print "failed to execute: $!\n"; 
    } 
    elsif ($? & 127) { 
     printf "child died with signal %d, %s coredump\n", 
      ($? & 127), ($? & 128) ? 'with' : 'without'; 
    } 
    else { 
     printf "child exited with value %d\n", $? >> 8; 
    } 

Answer 2

거의 확실하게 오류는 STDERR로 이동합니다. STDERR은 백틱에 캡처되지 않습니다. 두 출력 스트림을 모두 쉽게 캡처하려면 Capture::Tiny을 사용하십시오.