Help for this page
sub ikei { my ($n, $m) = @_; ... my $r = $n % $m; return ($q+1) x $r, ($q) x ($m-$r); }
Rate ike ikei ike 50.8/s -- -4% ... Rate ike ikei ike 50.5/s -- -5% ikei 52.9/s 5% --