int-benchmark-perl-5-vs-6-native-int.txt

# Perl 6 version that runs faster than Perl 5 equivalent

my int ($a, $one, $three, $limit) = (42, 1, 3, 10000000);
loop (my int $i = 0; $i < $limit; $i++) {
    $a += $one + $a%$three
}
say $a

# Perl 5 equivalent

my $a = 42;
for (my $i = 0; $i < 10000000; $i++) {
    $a += 1 + $a%3
}
print $a, "\n";