$ perl -MPath::Class -E " say file(1) "
1

$ perl -MPath::Class -E " say ref file(1) "
Path::Class::File

$ perl -MPath::Class -MData::Dump -E " dd file(1) "
bless({ dir => undef, file => 1, file_spec_class => undef }, "Path::Class::File")

$ perl -MPath::Class -E " say file(1)->basename "
1

$