Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
ABhere is intervening textC D
A B C, lots of text and numbers and equals and slashes DEFG
ABhere IS intervening TEXTC D
  2. or download this
    my $stuff = qr/[^A-Z]*/;
my $regex = join($stuff, split '','ABCD');