Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl 
    use strict;
    ...
        $have =~ s/\b[cf]? ${term} [fl]?/$term/xg;
    }
    is ($have, $want, 'Match');