From 760c373063f0b678028bf805319d9ad85f61f04a Mon Sep 17 00:00:00 2001
From: "Patrick R. Michaud" <pmichaud@pobox.com>
Date: Fri, 12 May 2006 18:43:00 +0000
Subject: [PATCH] [perl6]:  Added t/00-parrot/08-regex.t

git-svn-id: http://svn.perl.org/parrot/trunk/languages/perl6@12632 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
---
 t/00-parrot/08-regex.t | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100644 t/00-parrot/08-regex.t

diff --git a/t/00-parrot/08-regex.t b/t/00-parrot/08-regex.t
new file mode 100644
index 00000000000..656b1bb04f4
--- /dev/null
+++ b/t/00-parrot/08-regex.t
@@ -0,0 +1,15 @@
+#!./parrot
+
+# check basic regex capabilities
+
+use v6;
+
+say '1..3';
+
+'abc' ~~ /abc/ and say 'ok 1';
+'2' ~~ /^ \d+ $/ and say "ok ", $/;
+
+my $rx = / <alpha> /;
+'012a456' ~~ $rx and say 'ok 3';
+
+