Select Code to Download

sub ranges_javafan {
  my ($M, $N) = @_;
...
                 , int((($_+1)/$N)*($M+1))-1]
              } 0..$N - 1];
}