Help for this page
... use File::Spec; ... sub check_file{ -f && push ... , File::Spec->canonpath($File::Find::name); }
... use Path::Tiny; ... sub check_file{ -f && push ... , path($File::Find::name)->canonpath}); }