Regexp: Ersetzungsausdruck mitbenutzen - #112045 (Allgemeines zu Perl)

Linuxer

2008-07-13 14:52

User since
2006-01-27
3891 Artikel
HausmeisterIn

user image

KurtZ+2008-07-13 04:22:55--
mann oh mannnnnnn ... lernt nie aus! das mit der linken seite war mir klar, aber rechts schockt mich mal wieder heftig:
Code (perl): (dl )
1
2
3
  
DB<1> ($x='abc')=~s/(\w)/.\1/g ; print $x
.a.b.c

Nur weil man etwas in Perl einsetzen kann, heisst das noch lange nicht, dass man das auch einsetzen muss!

Perl warnt Dich übrgens, wenn Du im Ersetzungsteil die Rückreferenz \x benutzt:

Code: (dl )

1
2
3

$ perl -w
($x='abc')=~s/(\w)/.\1/g ; print $x
\1 better written as $1 at - line 1.

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!