my $rd3 = dir( ... );
my $srd3 = $rd3->stringify;
mkdir $srd3 or warn "couldn't make $srd3: $!\n";
say "srd3 is $srd3";
$b = file( $srd3, $_ );

##</code><code>##

my $rd3 = dir( ... );
$rd3->mkpath();
say "rd3 is $rd3";
my $f = $rd3->file( $_ );