Help for this page

Select Code to Download


  1. or download this
    did la 0.001
did bruja 0.001
did verde 0.001
...
Mary no 0.001
Mary dio 0.001
Mary una 0.001
  2. or download this
    sub probability
{
    my (%hash, $source, $target) = @_;
...

my $test = &probability(%hash, $hash{Mary}, $hash{Mary}{Maria});
print "$test\n";