Regex Kornshell

15/12/2007 - 00:40 von Paul Meier | Report spam
Hallo,

fuer folgenden Perlcode suche ich ein Script
(Kornshell Tru64)

#--
such=$(perl -ne '
push @a, $1.$3.$2.$4 if /(11)(22)(33)(\d{2})/;
END{print join "|", @a}
' $logdat)

echo $such


11332244|11332244|11332244|11332244



grep -E -v $such $datei
#--

Aus den Fundstellen soll ein Suchstring(Filter) gesetzt werden.

Freue mich ueber jede Anregung.

Gruss P.
 

Lesen sie die antworten

#1 Juergen P. Meier
15/12/2007 - 04:59 | Warnen spam
Paul Meier :
fuer folgenden Perlcode suche ich ein Script
(Kornshell Tru64)
#--
such=$(perl -ne '
push @a, $1.$3.$2.$4 if /(11)(22)(33)(\d{2})/;
END{print join "|", @a}
' $logdat)
echo $such

11332244|11332244|11332244|11332244





Wenn ich verstehen wuerde, was du mit diesem Perlcode genau erreichen
moechtest, koennte ich dir vielleicht helfen. Meine Perl-Kenntnisse
sind jedoch nicht ausreichend, um deine Intention erraten zu koennen.

Freue mich ueber jede Anregung.



Erklaere bitte einfach mal in Deutsch, was genau dein script machen
soll. Das ist einfacher, als irgendwelchen Obskuren Code zu
uebersetzen.

Juergen
Juergen P. Meier - "This World is about to be Destroyed!"
end
If you think technology can solve your problems you don't understand
technology and you don't understand your problems. (Bruce Schneier)

Ähnliche fragen