Help for this page
>perl -wMstrict -le "my $cs1 = qr{ [ab$%cd] }xms; ... " (?msx-i: [ab0cd] ) (?msx-i: [ab\$%cd] )