예: NETCONF Perl 클라이언트 애플리케이션을 사용하여 하드웨어 구성 요소 인벤토리 요청
NETCONF Perl 배포에는 Junos OS 실행하는 디바이스에서 다양한 기능을 수행하기 위한 여러 샘플 Perl 스크립트가 포함되어 있습니다. get_chassis_inventory.pl 스크립트는 라우팅, 스위칭 또는 보안 플랫폼에 설치된 하드웨어 구성 요소의 자세한 인벤토리를 검색하고 표시합니다. 이는 Junos OS 명령줄 인터페이스(CLI)에서 작동 모드 명령을 내리는 show chassis hardware detail 것과 동일합니다. 이 주제는 쿼리를 실행하는 스크립트 부분에 대해 설명합니다.
릴리스 16.1 Junos OS 이전에는 모든 Junos OS 릴리스에 NETCONF Perl 클라이언트의 새로운 릴리스 종속 버전이 포함되었습니다. 릴리스 16.1 Junos OS NETCONF Perl 클라이언트는 릴리스 독립이며 GitHub 및 CPAN에서 호스팅되며, Junos OS 릴리스의 모든 버전을 실행하는 디바이스를 관리할 수 있습니다. NETCONF Perl 배포의 릴리스 종속 버전에 있는 샘플 스크립트는 GitHub 및 CPAN에서 호스팅된 릴리스 독립 버전의 스크립트와 다릅니다.
NETCONF 서버에 대한 연결을 설정하면 스크립트가 요청을 전송 get_chassis_inventory 하고 인수를 detail 포함합니다.
my $query = "get_chassis_inventory"; my %queryargs = ( 'detail' => 'True' );
릴리스 종속 NETCONF Perl 배포를 사용할 때, 방법을 호출할 때 고정형 옵션을 포함하려면 옵션을 값 1(1)과 동일하게 설정합니다.
스크립트는 쿼리를 전송하고 변수에 반환 값을 $res 할당합니다. 스크립트는 먼저 RPC 요청과 표준 출력에 대한 응답을 인쇄한 다음 지정된 파일에 대한 응답을 인쇄합니다. 그런 다음 스크립트가 발생한 오류를 확인하고 인쇄합니다.
my $res; # Netconf server response
# send the command and get the server response
my $res = $jnx->$query(%queryargs);
print "Server request: \n $jnx->{'request'}\n Server response: \n $jnx->{'server_response'} \n";
# print the server response into xmlfile
print_response($xmlfile, $jnx->{'server_response'});
# See if you got an error
if ($jnx->has_error) {
croak "ERROR: in processing request \n $jnx->{'request'} \n";
} else {
print "Server Response:";
print "$res";
}
# Disconnect from the Netconf server
$jnx->disconnect();