[regex]::Replace($s,'(?<=(?<!\)(?:\{2})*)[$#]w{1,10}b', {param($match) $vartable[$match.Value] })

$s -replace '(?<=(?<!\)(?:\{2})*)[$#]w{1,10}b', { $vartable[$_.Value] }