<commit_before>use v6;
use IO::Path::More;
use Test;



if $*OS ne any( <MSWin32 dos VMS MacOS> ) {

plan 10;

is IO::Path::More.new("hello").Str,	"hello",	"class loaded";
is path("foo/bar"),			"foo/bar",	"path() works";
is path("."),				".",		"current directory";
is path(".."),				"..",		"parent directory";
# is path(''),				".",		"empty is current directory";
is path("//usr/////local/./bin/././perl/").cleanup, "/usr/local/bin/perl", "canonpath called";

is path("/").append('foo'),		"/foo",			"append to root";
is path(".").append('foo', 'bar'),	"foo/bar",		"append multiple";

say "# IO tests";
ok path($*CWD).e,		"cwd exists, inheritance ok";

ok path($*CWD).inode,		"inode works";
ok path($*CWD).device,		"device works";

}
else { plan 1; skip "all unix tests for now", 1; }

done;
<commit_msg>$*CWD is now a path object, not a string<commit_after>use v6;
use IO::Path::More;
use Test;



if $*OS ne any( <MSWin32 dos VMS MacOS> ) {

plan 10;

is IO::Path::More.new("hello").Str,	"hello",	"class loaded";
is path("foo/bar"),			"foo/bar",	"path() works";
is path("."),				".",		"current directory";
is path(".."),				"..",		"parent directory";
# is path(''),				".",		"empty is current directory";
is path("//usr/////local/./bin/././perl/").cleanup, "/usr/local/bin/perl", "canonpath called";

is path("/").append('foo'),		"/foo",			"append to root";
is path(".").append('foo', 'bar'),	"foo/bar",		"append multiple";

say "# IO tests";
ok path(~$*CWD).e,		"cwd exists, inheritance ok";

ok path(~$*CWD).inode,		"inode works";
ok path(~$*CWD).device,		"device works";

}
else { plan 1; skip "all unix tests for now", 1; }

done;

{'fraction_non_alphanumeric': 0.25183374083129584, 'fraction_numerical': 0.008557457212713936, 'mean_word_length': 3.772594752186589, 'pattern_counts': {'":': 0, '<': 5, '<?xml version=': 0, '>': 5, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '1928816', 'n_tokens_mistral': 682, 'n_tokens_neox': 641, 'n_words': 178}