On Sat, 30 Apr 2005, VULPE Dan wrote:

> In primul rand memorezi output-ul lui $(tc -s $DEV) intr-o variabila
> pe care o split-ulesti dupa /\n\n/ si aplici fiecarui rezultat un sablon
> cu expresii regulate din care iti scoti ce vrei tu.

        Cel mai eficient este sa tratezi acel output ca single line 
(vezi /s), fie tot outputul (dupa care te poti juca intr-o bucla cu 
un match global cu memorarea indexului - /g), fie outputul splituit dupa 
"class" sau, cum zicea Dan, dupa doua new line-uri. Adica ceva de genul:

my $output=qx!tc -s class show dev eth7!;

while ($output=/pattern/gs) {
        ($cutare, $lemn, $packets, $bytes, $coada, $etc)=($1, $2, $3 .... etc 
etc);
        [do stuff, print stuff, take decisions, etc];
}

-- 
Any views or opinions presented within this e-mail are solely those of
the author and do not necessarily represent those of any company, unless
otherwise expressly stated.

--- 
Detalii despre listele noastre de mail: http://www.lug.ro/


Raspunde prin e-mail lui