<$fh> doesn’t handle multi-line read about test-mockfile

[toddr]

this works fine.

perl -MTest::MockFile -e'my $m = Test::MockFile->file("/haha"); open my $h, ">", "/haha"; print {$h} "one\ntwo\nthree"; close $h; open my $rh, "<", "/haha"; undef $/; print <$rh>' 
one
two
three

[toddr]

your example only seems to want one read?

[toddr]

print seems to default to list context. This may be a bug in tie.

$>perl -e'open my $h, ">", "haha"; print {$h} "one\ntwo\nthree"; close $h; open my $rh, "<", "haha"; undef $/; print <$rh>'                 
one
two
three

[toddr]

Not well documented but READLINE in tie needs to check wantarray

https://github.com/CpanelInc/Test-MockFile/blob/master/lib/Test/MockFile/FileHandle.pm#L176

[toddr]

Will be in next release