Help language development. Donate to The Perl Foundation

FileSystem::Parent cpan:LEMBARK last updated on 2019-08-10

t/04-append.t
use v6.d;
use lib $*PROGRAM.parent(2).add( 'lib' ).absolute;

use Test;
use FileSystem::Parent;

my $append  = 'lib';

my $found   = scan-up :$append;
ok $found,   'scan-up $append';

put '# Found', $found;

ok $found ~~ / lib $/, "Found: '$append'";

done-testing;