Help for this page

Select Code to Download

Select or download this

sub genAbbrevRegex{
    my( $first, @rest ) = split '', shift;
...
s:  not ok
yees:  not ok
yess:  not ok