my $path3 = path($parent1, $file);
    say "path 3 is $path3";
    #my $path5 = path($path3)->assert( sub { $path3->exists } );
    #say "path 5 is $path5";