#!/usr/local/bin/perl -w
local $ENV{"PATH"} = "/usr/openv/netbackup/bin/admincmd" ;
open REPORT, "bpclclients class_name -allunique -noheader |" or die "Can't open bpclclients : $!" ;
my @rpts = <REPORT>;
print @rpts ;
close REPORT;