Re: [PERL] put foo fra linien indeholdene bar ind i $var

[Claus Ekstroem BSA <sslug@sslug>]

Hej Kim.

> jeg har en tekstfil, og jeg vil gerne finde alle de linier der
> indeholder ordet FOO. fra de linier vil jeg så tage den variable tekst
> efter BAR=  og putte ind i $FOOBAR (der er "" omkring teksten efter BAR=
> ).
> Hvordan pokker gør man dette ? 

Hvis du ikke kender raekkefoelgen paa FOO og BAR= kan du fx. lave en RE i stil med:

while (<>) {
    if (/FOO/) {
        if (/BAR=\"(.*)\"/) {
            $FOOBAR = $1;
        }
    }
}

Er det noget i den stil du mener?

Mvh,

Claus