Help for this page

Select Code to Download

Select or download this
```
s/$thing/$translate{$thing}/g;
```

Select or download this

my $re = join '|', keys %translate;
$re = qr/($re)/;
...
    s/$re/$translate{$1}/g;
    print;
}