_newlines => 0,
length => 11,
},
'assemble_meta for scalar that isnt a file'
);
is( $source->meta, $meta, '... and caches meta' );
}
# array check
{
my
r}, '... file->dir set' );
isnt( delete $file->{read}, undef, '... file->read set' );
isnt( delete $file->{write}, undef, '... file->write set' );
isnt( delete $file->{execute}, unde
r}, '... file->dir set' );
isnt( delete $file->{size}, undef, '... file->size set' );
isnt( delete $file->{binary}, undef, '... file->binary set' );
isnt( delete $file->{empty}, unde