diff options
author | Patrick Spek <p.spek@tyil.nl> | 2017-04-26 23:16:48 +0200 |
---|---|---|
committer | Patrick Spek <p.spek@tyil.nl> | 2017-04-26 23:16:48 +0200 |
commit | 6aed1eca976c3eec6b971f18a74943c8e5274d2e (patch) | |
tree | d5858e98e23a796d1bf77fb43563bf0c92dc0b36 /t/01-read.t | |
parent | c1dc65009e381ab09f15bb73529491d427d77232 (diff) |
Update tests
Diffstat (limited to 't/01-read.t')
-rw-r--r-- | t/01-read.t | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/t/01-read.t b/t/01-read.t new file mode 100644 index 0000000..9888ad7 --- /dev/null +++ b/t/01-read.t @@ -0,0 +1,18 @@ +#! /usr/bin/env perl6 + +use v6.c; +use Test; +use lib "lib"; + +use Config; + +plan 5; + +my $config = Config.new(); + +ok $config.read("t/files/config.yaml"), "Read a YAML file"; + +ok $config.get("a") eq "a", "Get simple key"; +ok $config.get("b.c") eq "c", "Get nested key"; +ok $config.get("nonexistant") === Nil, "Get nonexistant key"; +ok $config.get("nonexistant", "test") === "test", "Get nonexistant key with default"; |