Use a cache-hash.

s/(?<!\\)(\$\w+)(?![[{\w])/$rep{$1} ||= rvg()/ge;
[download]

That way, "$foo" always gets replaced by the same text.

japhy -- Perl and Regex Hacker