Re: [Debian] [OT] - Regulärer Ausdruck

[Martin Haefele <haefele@mpi-magdeburg.mpg.de>]

Robert Kasunic wrote:
> 
...
> 
> Ziffer  Ziffer  Ziffer          Text
> Ziffer  Ziffer  Ziffer          Text
> Ziffer  Ziffer  Ziffer          Text
> 
> Bsp.:
> 233     345     23              Dies ist ein Text
> 32      3       5               Noch ein Text
> 
> Die Spalten sind durch Whitespaces voneinander getrennt. Wie bekomme ich
> es mittels eines regulären Ausdrucks hin, daß nur in der letzten Spalte
> die Whitespaces durch Underscores ersetzt werden?
> 

Hi Robert,

mir faellt keine passende regexp ein, daher ein kleiner Dreizeiler in
Perl, der die Arbeit in drei Schritten macht. Dabei nehme ich an, dass
in $mystring die betreffende Zeile vorher eingelesen wurde (vielleicht
nicht gerade besonders elegant, aber tut)

$tmp1=substr($mystring,rindex($mystring,'  ')+2,length($mystring));
$tmp1 =~ s/ /_/g;
$mystring = substr($mystring,0,rindex($mystring,'  ')+2).$tmp1;

HTH,
Gruesse,

Martin.

-- 
-----------------------------------------------------------
Um sich aus der Liste auszutragen schicken Sie bitte eine
E-Mail an debian-user-de-request@lehmanns.de die im Subject
"unsubscribe <deine_email_adresse>" enthaelt.
Bei Problemen bitte eine Mail an: Jan.Otto@Lehmanns.de
-----------------------------------------------------------

838 eingetragene Mitglieder in dieser Liste.