Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -le
    "my $re_obj = qr{([0-6BS])};
    ...
    "
    (?^:([0-6BS]))
    match, $1 captured 'B'