Trying to get this script to 'claimsubmit' ONLY if the system call
returns STDOUT, but I'm having a little trouble getting my script to
verify that and act accordingly.
opendir DIRH, "$unknown" or die "Can't open: $!\n";
foreach my $files (sort readdir DIRH)
{
my @claims = (grep(!/^\.{1,2}$/, $files));
if (system ("zowner $claims[0]"))
{
# (system("claimsubmit $claims[0]")); <-- once it works, i'll use
this
print "claimsubmitting $claims[0] \n";
}
}
Thanks,
Craig
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]