I have used the following PERL: #!/usr/bin/perl $| = 1; $bpclclients = "/usr/openv/netbackup/bin/admincmd/bpclclients"; $bpgetconfig = "/usr/openv/netbackup/bin/admincmd/bpgetconfig -M"; ### ### GET THE HOSTS TO CHECK: @hosts = `$bpclclients | awk '{print \$3}'`; ### ### Run check loop on 'HOSTS TO CHECK' foreach $host (@hosts) { chomp($host); ## Run getconfig $version = `$bpgetconfig $host | grep -i version | grep -v VERSIONINFO | awk -F= '{print \$2}'`; chomp($version); ## PRINT TO LOG and STDOUT: print "Host: $host :: Version: $version\n"; open(LOG, ">>bkup_hosts.log"); print LOG "Host: $host :: Version: $version\n"; close LOG; } #=============================================================================== HTH --Chris
|
- Re: [Veritas-bu] Way to get revision with 5.1? Christopher Jay Manders
- Re: [Veritas-bu] Way to get revision with 5.1... Ed Wilts
- RE: [Veritas-bu] Way to get revision with 5.1... Piszcz, Justin
- RE: [Veritas-bu] Way to get revision with 5.1... Mark . Donaldson
- RE: [Veritas-bu] Way to get revision with 5.1... Williams, Kristopher L