my $var = 'Ein blödes Beispiel';

$var =~ s~blödes~schönes~;

print $var;