setVar('$hop', '\x41');
print(
    concat(
        'At the',
        getVar('$hop')
    )
);
substitute(
    getVar('$_'),
    lhsRe('.'),
    rhsEval(
        expandBackslashed(
            rhsEval('
                concat(
                    \'A\',
                    getVar(\'$hop\')
                );
                '
            )
        )
    )
);