Help for this page

Select Code to Download


  1. or download this
        my $divisor = (@pairs + length($dictionWord)-1);
        die "Uhoh - cannot divide by zero. List of pairs is '@pairs' and d
    +ictionWord is '$dictionWord'."
        my $bigramCoef = 2 * $matches / $divisor;