+ return (add $r2, scale $c2, $r1), undef if defined $r1 and zero $l1
+ and not zero $l2;
my $c1 = count $l1;
$l2 = { $l2 => 1 } unless ref $l2;
my $c1 = count $l1;
$l2 = { $l2 => 1 } unless ref $l2;
@@ -616,7+605,7 @@ You can contact me by mail or on #perl @ FreeNode (vincent or Prof_Vince).
=head1 BUGS
=head1 BUGS
-Please report any bugs or feature requests to C<bug-b-nary at rt.cpan.org>, or through the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Sub-Nary>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
+Please report any bugs or feature requests to C<bug-sub-nary at rt.cpan.org>, or through the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Sub-Nary>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.