for my $n (148..153) {
    print $n + 50 - $n % 50, "\n";
}