<commit_before>use v6;
use Test;

plan 1;
ok 1;


# vim: ft=perl6
<commit_msg>[io grant] Test IO::Path.Str works as advertised<commit_after>use v6;
use Test;

plan 3;

{ # .Str tests
    is-deeply '.'.IO.Str, '.', 'Str does not include CWD [relative path]';
    is-deeply '/'.IO.Str, '/', 'Str does not include CWD [absolute path]';
    is-deeply IO::Path.new(
        :volume<foo:>, :dirname<bar>, :basename<ber>, :SPEC(IO::Spec::Win32.new)
    ).Str, 'foo:\bar\ber', 'Str does not include CWD [mulit-part .new()]'
}


# vim: ft=perl6

{'fraction_non_alphanumeric': 0.1921641791044776, 'fraction_numerical': 0.016791044776119403, 'mean_word_length': 3.5508474576271185, 'pattern_counts': {'":': 0, '<': 6, '<?xml version=': 0, '>': 6, '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': '1620728', 'n_tokens_mistral': 224, 'n_tokens_neox': 212, 'n_words': 59}