Perl 9 has now infinite loops!
Perl 9 supports an infinite loop which needs only 1 second of runtime. Which is faster than every other language needs to do this. This is possible because of very modern algorithms of the Perl 9 internals.
#!/usr/bin/perl9
my $pi;
infinite {
$pi = calculate_pi;
say $pi; # Prints out THE EXACT number Pi!
}
# Will need infinite time to print Pi because not in the infinite loop!
say $pi;
It is also possible to run several infinite loops in parallell using threads!
my $pi;
my $code1 = infinite {
$pi = calculate_pi;
say $pi; # Prints out THE EXACT number Pi!
}
my $euler;
my $code2 = infinite {
$euler = calculate_euler;
say $euler; # Prints out THE EXACT number euler!
}
Thread.new(code => $code1).run;
Thread.new(code => $code2).run;