<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//DE"><HTML><HEAD><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii"><TITLE>Message</TITLE></HEAD><BODY><P>On Sat, 28 Mar 2009, at 21:09:31, <A href="mailto:create-soft@freenet.de">create-soft@freenet.de</A> wrote:</P>
<P>>On Thu, 26 Mar 2009, at 14:16:50, Falk Herrmann <<A href="mailto:falk.herrmann@bike24.net">falk.herrmann@bike24.net</A>> wrote:<BR>>Hi,<BR>><BR>>hat jemand eine Idee zu regulären Ausdrücken um Leerzeichen zu <BR>>entfernen, welche nur zwischen Zahlen auftreten?<BR>><BR>>Bsp.:<BR>><BR>>"wort1 12 34 56 wort 2"<BR>><BR>>soll zu<BR>><BR>>"wort1 123456 wort 2"<BR>><BR>>werden.<BR>><BR>><BR>>Gruß Falk.<BR>><BR>>#!/usr/bin/perl -w<BR>>#*** test_lookaround.pl ***#<BR>>#-------------------------------------------------<BR>> use strict;<BR>>#-------------------------------------------------<BR>> my $str = "1 2 3 1.wort1 12 34 56 tab 1 tt 2 tab 2.wort 2 das 3.wort24 1 2 3 4 endline 1 nnn 2 beginline2 1 1 1 1 10 4";<BR>> $str =~ s{(?:(?:A)|(?<=s))([d ]+)(?:(?=s)|(?:z))}{join'',split/ /,$1}eg;<BR>> print("$strn");<BR>>#-------------------------------------------------<BR>> Gruß Torsten</P>
<P> So '([d ]+)' gehts nicht!!!<BR> Paßt auch auf Leeerzeichen die keine Zahlen enthalten und umgekehrt.<BR> Also so '(d+ [d ]*d)'.</P>
<P>#!/usr/bin/perl -w<BR>#*** test_lookaround2.pl ***#<BR>#-------------------------------------------------<BR> use strict;<BR>#-------------------------------------------------<BR> my $str = "1 2 3 4.wort_5 6 7 8 space:' ' tab't12 34 56t' newline:'n44 55 66n' 22 10 20 30 4";<BR> print("$strn");<BR> $str =~ s{(?:A|(?<=s))(d+ [d ]*d)(?=s|z)}{join'',split/ /,$1}eg;<BR> print("$strn");<BR>#-------------------------------------------------</P>
<P> Torsten</P>
<br>--<br><!-- AdSpace freenet EMO Webmail Banner -->
<a href="http://adserver.freenet.de/click.ng/site=fn&prod=chetools&kat=inhalte&tbl=webmail&ppos=14&TransactionID=1238438067416896&rgtg=256" target="_blank"><img src="http://adserver.freenet.de/image.ng/site=fn&prod=chetools&kat=inhalte&tbl=webmail&ppos=14&TransactionID=1238438067416896&rgtg=256" border="0"></a><!-- / AdSpace -->
</BODY></HTML>