Make PerlIO::get_layers accept IO references #20058

[Leont]

PerlIO::get_layers used to not work with IO references, now it does.

perl -MPerlIO -E 'my @ls = PerlIO::get_layers(*STDOUT{IO}); say("[@ls]")'

This fixes #20058