X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Nary.git;a=blobdiff_plain;f=lib%2FSub%2FNary.pm;fp=lib%2FSub%2FNary.pm;h=4b87e45bc779c0fd4a9c9a3e110b2816c95b8a1b;hp=a90787ba2b96c3d1a0bfbea93164b41991e2bc6b;hb=19271bbd36d8b5346d323f6e47038b9abff33a91;hpb=abc37c27d6f3fb43537ade322a66d4a42e375f83

diff --git a/lib/Sub/Nary.pm b/lib/Sub/Nary.pm
index a90787b..4b87e45 100644
--- a/lib/Sub/Nary.pm
+++ b/lib/Sub/Nary.pm
@@ -28,7 +28,7 @@ BEGIN {
 
     use Sub::Nary;
 
-    my $sn = Sub::Nary->new();
+    my $sn = Sub::Nary->new;
     my $r  = $sn->nary(\&hlagh);
 
 =head1 DESCRIPTION
@@ -39,11 +39,15 @@ This module uses the L<B> framework to walk into subroutines and try to guess ho
 
 =head2 C<new>
 
+    my $sn = Sub::Nary->new;
+
 The usual constructor. Currently takes no argument.
 
-=head2 C<nary $coderef>
+=head2 C<nary>
+
+    my $res = $sn->nary($coderef);
 
-Takes a code reference to a named or anonymous subroutine, and returns a hash reference whose keys are the possible numbers of returning scalars, and the corresponding values the "probability" to get them. The special key C<'list'> is used to denote a possibly infinite number of returned arguments. The return value hence would look at
+Takes a reference to a named or anonymous subroutine, and returns a hash reference whose keys are the possible numbers of returning scalars, and the corresponding values the "probability" to get them. The special key C<'list'> is used to denote a possibly infinite number of returned arguments. The return value hence would look at
 
     { 1 => 0.2, 2 => 0.4, 4 => 0.3, list => 0.1 }