<commit_before># Pragmas.
use strict;
use warnings;

# Modules.
use File::Object;
use Test::More 'tests' => 1;

# Test.
my $obj = File::Object->new;
my $ret = $obj->up;
ok($ret->isa('File::Object'));<commit_msg>Rewrite to isa_ok().<commit_after># Pragmas.
use strict;
use warnings;

# Modules.
use File::Object;
use Test::More 'tests' => 1;

# Test.
my $obj = File::Object->new;
my $ret = $obj->up;
isa_ok($ret, 'File::Object');
{'fraction_non_alphanumeric': 0.21495327102803738, 'fraction_numerical': 0.004672897196261682, 'mean_word_length': 5.128571428571429, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 10, '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': '4785202', 'n_tokens_mistral': 174, 'n_tokens_neox': 169, 'n_words': 44}