[nmstools-cvs] src/bin mpls_collect_rt_vpnint1.pl.in,1.1,1.2
Brought to you by:
ssinyagin
|
From: Michel H. <mi...@pr...> - 2002-11-18 12:43:52
|
Update of /cvsroot/nmstools/src/bin
In directory sc8-pr-cvs1:/tmp/cvs-serv30862
Modified Files:
mpls_collect_rt_vpnint1.pl.in
Log Message:
error corrected
Index: mpls_collect_rt_vpnint1.pl.in
===================================================================
RCS file: /cvsroot/nmstools/src/bin/mpls_collect_rt_vpnint1.pl.in,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** mpls_collect_rt_vpnint1.pl.in 18 Nov 2002 11:39:52 -0000 1.1
--- mpls_collect_rt_vpnint1.pl.in 18 Nov 2002 12:43:49 -0000 1.2
***************
*** 34,42 ****
$workingdir = $nms_config{'env'}{'DATA'} . '/mpls';
#Enumerate nodes and collect information
! nms_enumnodes( $nodelist, \&cb_collectall );
sub cb_collectall
--- 34,43 ----
$workingdir = $nms_config{'env'}{'DATA'} . '/mpls';
+ $rt_vpnint1_outfile = $workingdir . '/rt_vpnint1';
#Enumerate nodes and collect information
! nms_enumnodes( $seednode, \&cb_collectall );
sub cb_collectall
***************
*** 46,50 ****
# Get "sh running" report
! $telnet->log_file($workingdir . '/rt_vpnint1', "w");
printf $telnet ("show ip route vrf VPN-INT1\r", $_);
--- 47,51 ----
# Get "sh running" report
! $telnet->log_file($rt_vpnint1_outfile, "w");
printf $telnet ("show ip route vrf VPN-INT1\r", $_);
|