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]

Reply via email to