Help for this page

Select Code to Download


  1. or download this
    sub fuzz {
        my $n = shift();
    ...
    
        return $neg ? -$n2 : $n2;
    }
    
  2. or download this
    use Test::More;
    
    ...
    is( fuzz(99_704_567), 100_000_000 );
    
    done_testing();