$Data =~ s/([^\\])\$(\w+)/$1${$2}/g; $Data =~ s/\\\$(\w+)/\$$1/g; [download]
In reply to Re: regexp trouble... by Ridge in thread regexp trouble... by Anonymous Monk