Doppelbuchstaben umklammern (war: Help) - #64683 (Allgemeines zu Perl)

Crian

2006-04-11 11:49

User since
2003-08-04
5873 Artikel
ModeratorIn

Ich würde ja mal kurz auf der Konsole testen, bevor ich so schlicht falsche Dinge verbreite =)

Code: (dl )

C:\>perl
my $text = 'a1b2c3d4';
$text =~ s~\w~#~g;
print $text;
^Z
########

Ich mag \w nicht so gern, weil man sich dann nicht darauf verlassen kann, dass das Programm überall das gleiche macht. Ich hatte jedenfalls schonmal unangenehme Überraschungen bei der Verwendung von \w.\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite