Opened by Brenner at 2010-01-29 13:57
User since
2005-08-17
1420 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-08-17
1420 Artikel
BenutzerIn
Das ist eigentlich recht einfach:
Mit s/// wird eine Ersetzung gemacht. Dabei werden immer 2 Zeichen gemachted ((.).). Die runden Klammern um den ersten Punkt bedeuten "pack das passende Zeichen nach $1". Ja und dann werden die beiden gematchten Zeichen einfach durch $1 ersetzt und das ganze für die gesamte Zeile.
Code (perl): (dl
)
$string =~ s/(.)./$1/g;
Mit s/// wird eine Ersetzung gemacht. Dabei werden immer 2 Zeichen gemachted ((.).). Die runden Klammern um den ersten Punkt bedeuten "pack das passende Zeichen nach $1". Ja und dann werden die beiden gematchten Zeichen einfach durch $1 ersetzt und das ganze für die gesamte Zeile.