zeichenkette gruppieren
am 25.08.2006 09:32:34 von Scotter
hallo
ich sollte eine zeichenkette gruppieren:
alus tttttttttttttttttttt
wird ttttt-ttttt-ttttt-ttttt
gibt es eine eleganterer (und vor allen kürzere)
Lösung als substr()?
irgendwie mit $1 $2 $3 $4?
greets
-/--\-
alex
Re: zeichenkette gruppieren
am 25.08.2006 10:20:04 von unknown
Post removed (X-No-Archive: yes)
Re: zeichenkette gruppieren
am 25.08.2006 20:26:27 von Christian Winter
Martin Trautmann schrieb:
> On Fri, 25 Aug 2006 09:32:34 +0200, Alex Kainz wrote:
>>
>> ich sollte eine zeichenkette gruppieren:
>>
>> alus tttttttttttttttttttt
>> wird ttttt-ttttt-ttttt-ttttt
>>
>> gibt es eine eleganterer (und vor allen kürzere)
>> Lösung als substr()?
>>
>> irgendwie mit $1 $2 $3 $4?
>
> s/(.{5})(.{5})(.{5})(.{5})/$1-$2-$3-$4/
>
> Vermutlich geht's noch einfacher, aber das sollte erst mal taugen,
Eine Möglicheit:
s/[^-]{5}(?!$)/$&-/g;
MfG
-Christian
Re: zeichenkette gruppieren
am 26.08.2006 09:02:23 von Scotter
> s/(.{5})(.{5})(.{5})(.{5})/$1-$2-$3-$4/
>
> Vermutlich geht's noch einfacher, aber das sollte erst mal taugen,
> Martin
danke, das ist super kurz und vor allem übersichtlich!
greets
-/--\-
alex
Re: zeichenkette gruppieren
am 28.08.2006 21:52:56 von Steffen Panning
Christian Winter wrote:
> Eine Möglicheit:
> s/[^-]{5}(?!$)/$&-/g;
>
Hallo Christian, das funktioniert zwar,
aber enthaelt $& und das ist ein performance killer, der sich auf die
performance _aller_ regex-auswertungen in dem Programm auswirkt.
Siehe perldoc perlre
besser waere s/([^-]{5})(?!$)/$1-/g;
greets Steffen