Something
public text v1 · immutable#!/usr/bin/perl -wl
use strict;
my $str = "Bünyamin";
my $x = "Bü";
my $y = "Cv";
eval "\$str =~ tr/$x/$y/;";
print $str;
my $str2 = "Bünyamin";
$str2 =~ tr/$x/$y/;
print $str2;#!/usr/bin/perl -wl
use strict;
my $str = "Bünyamin";
my $x = "Bü";
my $y = "Cv";
eval "\$str =~ tr/$x/$y/;";
print $str;
my $str2 = "Bünyamin";
$str2 =~ tr/$x/$y/;
print $str2;