Help for this page
c:\@Work\Perl\monks\marek1703>perl -wMstrict -le "my $sans_esc = qr/[#$%&~_}{^]/; ... " (?^:[#0&~_}{^]) (?^:[#\$%&~_}{^])