[euler] reduce progress output verbosity in problem 14

Raku · Mar 15, 2015 · 616a279 · 616a279
1 parent 4480bda
commit 616a279
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/categories/euler/prob014-felher.pl b/categories/euler/prob014-felher.pl
@@ -15,7 +15,7 @@
 my $max = 0;
 my $start = 0;
 for 1 ..^ 1_000_000 -> $n {
-    say $n; #just for progress
+    say "Starting number: $n" unless $n % 10000; #just for progress
     my $length = get-length $n;
 
     if $length > $max {