aboutsummaryrefslogtreecommitdiff
path: root/t/03-having.t
diff options
context:
space:
mode:
authorPatrick Spek <p.spek@tyil.nl>2017-04-26 23:10:00 +0200
committerPatrick Spek <p.spek@tyil.nl>2017-04-26 23:10:00 +0200
commitc2b980b7962951bc5c277473d41974e76a5e66fa (patch)
tree990e016095549d0b7c052d0855b60eb7d34daeea /t/03-having.t
parented219a26574e05ba27264d73e75e5690e478570f (diff)
Rename test files
Diffstat (limited to 't/03-having.t')
-rw-r--r--t/03-having.t23
1 files changed, 23 insertions, 0 deletions
diff --git a/t/03-having.t b/t/03-having.t
new file mode 100644
index 0000000..0627ed5
--- /dev/null
+++ b/t/03-having.t
@@ -0,0 +1,23 @@
+#! /usr/bin/env perl6
+
+use v6.c;
+use Test;
+use lib "lib";
+
+plan 4;
+
+use Config;
+
+my $config = Config.new();
+
+$config.read({
+ a => "a",
+ b => {
+ c => "c"
+ }
+});
+
+ok $config.has("a"), "Check existence of simple key";
+ok $config.has("b.c"), "Check existence of nested key";
+ok $config.has(["a"]), "Check existence of simple key using array";
+ok $config.has(["b", "c"]), "Check existence of nested key using array";