no strict;
$txt =~ s/\$([A-Za-z0-9_]+)/${$1}/eg;