Help for this page

Select Code to Download

Select or download this
```
my @words = split / /, $s;
```

Select or download this

# match a backslash followed by two characters,
#   then compute the replacement by looking into %words
$s =~ s{(\\..)}{ $words{$1} || $1 }ge;