Help for this page
$ perl -wde 0 main::(-e:1): 0 ... DB<2> s/([+*^\$\]])/\\$1/g DB<3> p $_ a\+b\*\^c\$\]d