<commit_before>use strict;
use warnings;

# TRUE and FALSE
use constant::boolean;
use Test::More;
use Test::Assert ':assert';
# test::assert uses Exceptions
use Try::Tiny;

use_ok( 'punit::IOAccess');
my $t= punit::IOAccess->new();

assert_isa('punit::IOAccess', $t, "have right object");

assert_true($t->listAPI('punit::IOAccess'), "have data from listAPI");
# print $t->listAPI('punit::IOAccess');

my @t=$t->listAPI('punit::IOAccess');
@t=sort @t;
assert_deep_equals( \@t, [ 'createTestPath', 'listAPI', 'writeTestFile' ], "have expected list from IOAccess");

@t  = sort $t->listAPI('punit::IOAccess');<commit_msg>Need param now, or get warnings.<commit_after>use strict;
use warnings;

# TRUE and FALSE
use constant::boolean;
use Test::More;
use Test::Assert ':assert';
# test::assert uses Exceptions
use Try::Tiny;

use_ok( 'punit::IOAccess');
my $t= punit::IOAccess->new(0);

assert_isa('punit::IOAccess', $t, "have right object");

assert_true($t->listAPI('punit::IOAccess'), "have data from listAPI");
# print $t->listAPI('punit::IOAccess');

my @t=$t->listAPI('punit::IOAccess');
@t=sort @t;
assert_deep_equals( \@t, [ 'createTestPath', 'listAPI', 'writeTestFile' ], "have expected list from IOAccess");

@t  = sort $t->listAPI('punit::IOAccess');
{'fraction_non_alphanumeric': 0.20031796502384738, 'fraction_numerical': 0.000794912559618442, 'mean_word_length': 7.449664429530201, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 13, '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': '3794567', 'n_tokens_mistral': 451, 'n_tokens_neox': 448, 'n_words': 110}