$/="";
while(<FILE>) {
s/(?<!\\)(\$\w+(?![\[{\w]))/rvg()/ge;
print;
}