$string = 'fred'
%substitution = (
    2 => 'xy'
    3 => 'ab'
)
someFunction($string, %substitution);
print;

##</code><code>##

fred
fxed
fyed
frad
frbd
fxad
fxbd
fyad
fybd