Perl 및 SCP를 사용하여 복사 된 파일 확인

Question

Perl SCP을 사용하여 원격 서버에서 복사 한 파일을 확인하거나 가능할 수 있습니까? 아래는 내가 사용하고있는 Perl 명령입니다. 내 옵션이 다소 제한적이므로 SSH을 사용할 수 없습니다.

$scpe->scp("/u02/oraclebackup/$tar_file","HOST:/u04/orabkup/oraclebackup/oemp/"); 

Answer 1

좋아, 내 문제에 대한 해결책을 발견했습니다과 직접 사본을 확인하지 않습니다 동안 예상되는 하나의 옆에 에러가 발생했을 경우는 스크립트를 중지합니다. 여기 내 코드가 있습니다 :

$scpe->error_handler(\&scp_errors); 
$scpe->scp("/u02/oraclebackup/$tar_file", 
    "HOST:/u04/orabkup/oraclebackup/oemp/"); 

#Error trapping with exception for known harmless error 
sub scp_errors { 
    my $line = shift; 

    if ($line =~ /scp timed out while trying to connect to/) { 
     return (0); 
    } else { 
     return (1); 
    } 
} 

이것은 내 문제를 모두 해결 한 것 같습니다. 고마워요 @ chrsblck