Help for this page

Select Code to Download


  1. or download this
    sub fuzzyMatch {
        my( $rHay, $rNee, $misses ) = @_;
    ...
            ) >= $min ? $_ : ()
        } 0 .. length( $$rHay ) - $lNee;
    }