Filehandle STDIN reopened as $fh only for output

[eserte]

t/statocles.t fails on some of my smokers:

    # Current locale: C

        #   Failed test 'nothing on stderr'
        #   at t/statocles.t line 70.
        #          got: 'Filehandle STDIN reopened as $fh only for output at /usr/perl5.31.4p/lib/site_perl/5.31.4/Path/Tiny.pm line 1087.
        # Filehandle STDIN reopened as $fh only for output at /usr/perl5.31.4p/lib/site_perl/5.31.4/Path/Tiny.pm line 1048.
        # '
        #     expected: undef
        # Looks like you failed 1 test of 3.

    #   Failed test 'run the command'
    #   at t/statocles.t line 75.
    # Looks like you failed 1 test of 2.

#   Failed test 'handle locales on ARGV and STDIN'
#   at t/statocles.t line 95.
# Looks like you failed 1 test of 2.
t/statocles.t ................. 
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/2 subtests 

This seems to happen with bleadperl (>=5.31.1).

[eserte]

But not only on bleadperl, it happens also with older perls, for example 5.18.2 @ freebsd 9:

    # Current locale: de_DE.ISO8859-1/de_DE.ISO8859-1/de_DE.ISO8859-1/C/de_DE.ISO8859-1/de_DE.ISO8859-1

        #   Failed test 'nothing on stderr'
        #   at t/statocles.t line 70.
        #          got: 'Filehandle STDIN reopened as $fh only for output at /usr/perl5.18.2/lib/site_perl/5.18.2/Path/Tiny.pm line 1087.
        # Filehandle STDIN reopened as $fh only for output at /usr/perl5.18.2/lib/site_perl/5.18.2/Path/Tiny.pm line 1048.
        # '
        #     expected: undef
        # Looks like you failed 1 test of 3.

    #   Failed test 'run the command'
    #   at t/statocles.t line 75.
    # Looks like you failed 1 test of 2.

#   Failed test 'handle locales on ARGV and STDIN'
#   at t/statocles.t line 95.
# Looks like you failed 1 test of 2.
t/statocles.t ................. 
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/2 subtests