text
Jenne's regexp
perl -p -i -e 's/\\\"\$([a-z]+)\[([a-z]+)\]\\\"/\047\"\.\$$1\[$2\]\.\"\047/g'
perl -p -i -e 's/\$([a-z]+)\[([a-z]+)\]/\$$1\[\047$2\047\]/g'
perl -p -i -e 's/\\\"\$([a-z]+)\[([a-z]+)\]\\\"/\047\"\.\$$1\[$2\]\.\"\047/g'
perl -p -i -e 's/\$([a-z]+)\[([a-z]+)\]/\$$1\[\047$2\047\]/g'