Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 24 lines (14 sloc) 0.362 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
use v6;

# L<S28/Named variables/$*CWD>
# See also S16-io/cwd.t

use Test;

plan 2;

# $*CWD is currently just a string

ok( defined($*CWD), 'we have something in our $CWD');

# check if there is a t subfolder

my $subfolder_exists = 0;
if "$*CWD/t".IO ~~ :e {
    $subfolder_exists = 1;
}#if
ok( $subfolder_exists, 'we have a "t" subfolder');


# vim: ft=perl6
Something went wrong with that request. Please try again.