Fetching contributors…
Cannot retrieve contributors at this time
12 lines (8 sloc) 198 Bytes
use v6;
use Test;
# L<S16/IO/$*CWD>
# see also S28-named-variables/cwd.t
plan 3;
isa-ok $*CWD, IO::Path;
lives-ok { $*CWD.perl }, '$*CWD.perl works';
lives-ok { $*CWD.gist }, '$*CWD.gist works';