Output to stdout isntead of file

1 files changed, 4 insertions, 3 deletions

diff --git a/utils/genwords.raku b/utils/genwords.raku
index 1ba9df8..89676ca 100644
--- a/utils/genwords.raku
+++ b/utils/genwords.raku
@@ -76,7 +76,7 @@ for "patterns".IO.lines -> $pattern {
 }
 
 sub MAIN($max-syllables, $n-outputs) {
-	my $output = open "output.txt", :w;
+	# my $output = open "output.txt", :w;
 
 	for (1..$n-outputs) {
 		my $word = '';
@@ -84,7 +84,8 @@ sub MAIN($max-syllables, $n-outputs) {
 		for (1..$n-syllables) {
 			$word ~= @possible-syllables[@possible-syllables.elems.rand.floor];
 		}
-		$output.say(rewrite($rewrite-rules, $word))
+		# $output.say(rewrite($rewrite-rules, $word))
+		say rewrite($rewrite-rules, $word)
 	}
-	$output.close
+	# $output.close
 }