<commit_before>use Test;

plan 13;

my $said;
sub say(*@a) { $said = @a.map(*.gist).join }   # don't care about the new line

{
    my $a = 42;
    say 'value = $a';
    is $said, q/value = $a/;
    say "value = $a";
    is $said, q/value = 42/
}

{
    my @a = ^10;
    say 'value = @a';
    is $said, q/value = @a/;
    say "value = @a";
    is $said, q/value = @a/;
}

{
    my @a = ^10;
    say "value = @a[]";
    is $said, q/value = 0 1 2 3 4 5 6 7 8 9/;
}

{
    my %h = a => 42, b => 666;
    say "value = %h{}";
    ok $said eq q/value = a	42 b	666/|q/value = b	666 a	42/;<commit_msg>more tests of \n in Map.Str<commit_after>use Test;

plan 13;

my $said;
sub say(*@a) { $said = @a.map(*.gist).join }   # don't care about the new line

{
    my $a = 42;
    say 'value = $a';
    is $said, q/value = $a/;
    say "value = $a";
    is $said, q/value = 42/
}

{
    my @a = ^10;
    say 'value = @a';
    is $said, q/value = @a/;
    say "value = @a";
    is $said, q/value = @a/;
}

{
    my @a = ^10;
    say "value = @a[]";
    is $said, q/value = 0 1 2 3 4 5 6 7 8 9/;
}

{
    my %h = a => 42, b => 666;
    say "value = %h{}";
    ok $said eq "value = a\t42\nb\t666";
{'fraction_non_alphanumeric': 0.21271186440677967, 'fraction_numerical': 0.05508474576271186, 'mean_word_length': 1.8457831325301204, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 7, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 2, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '6487105', 'n_tokens_mistral': 617, 'n_tokens_neox': 542, 'n_words': 177}