From 9687382b803ec0dc5a7dd55be88b53a4264215f9 Mon Sep 17 00:00:00 2001 From: Patrick Spek Date: Sun, 23 Apr 2017 21:24:26 +0200 Subject: Initial commit --- t/getting.t | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 t/getting.t (limited to 't/getting.t') diff --git a/t/getting.t b/t/getting.t new file mode 100644 index 0000000..15937a7 --- /dev/null +++ b/t/getting.t @@ -0,0 +1,22 @@ +#! /usr/bin/env perl6 + +use v6.c; +use Test; +use lib "lib"; + +plan 3; + +use Config; + +my $config = Config.new(); + +$config.read({ + a => "a", + b => { + c => "c" + } +}); + +ok $config.get("a") eq "a"; +ok $config.get("b.c") eq "c"; +ok $config.get("nonexistant") === Nil; -- cgit v1.1