I get some output in the COMMAND filehandle, as you see i try to dont show it by
hiding it into an $output , then while the COMMAND is running i want perl to
interactivly examine the $output and seach for 10% if its there is should only print
that to the screen. now it still prints all the $_ to the screen..how do i fix this?
@vobs = `dir /b $backupdir`;
chomp @vobs;
foreach $vob (@vobs)
{
open(COMMAND, `$dbcheck -a -k -r10 -p8192 $backupdir\\$vob\\db\\vob_db`);
while (<COMMAND>)
{
$output = $_;
if ($output =~ /.10\%./)
{
print "found 10\%";
}
}
}
thx for help
//Dave
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]