From 15bf7e64bb4a56c407d265e88ff5e47be9b5c5fb Mon Sep 17 00:00:00 2001
From: Aleks-Daniel Jakimenko-Aleksejev <alex.jakimenko@gmail.com>
Date: Sun, 7 Apr 2019 22:07:38 +0300
Subject: Use args instead of stdin

It's easier to play with it this way.
---
 challenge-002/alexdaniel/perl6/ch-1.p6 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/challenge-002/alexdaniel/perl6/ch-1.p6 b/challenge-002/alexdaniel/perl6/ch-1.p6
index 9c3ed12b20..7782c6dcea 100644
--- a/challenge-002/alexdaniel/perl6/ch-1.p6
+++ b/challenge-002/alexdaniel/perl6/ch-1.p6
@@ -6,4 +6,4 @@
 # the integers. So it's just a neat example on how to do unicode-aware
 # number matching.
 
-put S:r/^[ <:Nd> & <:Numeric_Value(0)> ]* <before <:Nd>+$>// for lines
+put S:r/^[ <:Nd> & <:Numeric_Value(0)> ]* <before <:Nd>+$>// for @*ARGS
-- 
cgit