for my $dist (0 .. $distance) {