http://www.perlmonks.org?node_id=1148067


in reply to Regex with condition

This was asked and answered just yesterday ... er 2 days ago: y/·/./ gives two points instead of one.

You need to add use utf8; 

use utf8;

my $str = '  {Weiß am Zug}  *';
$str =~ s/Weiß/Schwarz/g;
print $str;

[download]

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

In Section Seekers of Perl Wisdom