diff options
Diffstat (limited to 'perl9.buetow.org/content/Extended-Features.sub/Infinite-Loops.xml')
| -rw-r--r-- | perl9.buetow.org/content/Extended-Features.sub/Infinite-Loops.xml | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/perl9.buetow.org/content/Extended-Features.sub/Infinite-Loops.xml b/perl9.buetow.org/content/Extended-Features.sub/Infinite-Loops.xml deleted file mode 100644 index d8658b7..0000000 --- a/perl9.buetow.org/content/Extended-Features.sub/Infinite-Loops.xml +++ /dev/null @@ -1,34 +0,0 @@ -<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> -<content> - <pagetitle>Perl 9 has now infinite loops!</pagetitle> - <text>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.</text> - <code> -#!/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; - </code> - <text>It is also possible to run several infinite loops in parallell using threads!</text> - <code> -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; - </code> -</content> |