我可以找出给定文件句柄的Perl IO Layer吗？

Question

是否有可能找出Perl文件句柄上的IO Layer？

例如：

open(my $fh, '<:encoding(UTF-8)', $filename)
    or die "Unable to open '$filename': $!";

say io_layer($fh); # prints "encoding(UTF-8)"

Answer 1

以下命令返回文件句柄上的PerlIO图层的名称。

my @layers = PerlIO::get_layers($fh); # Or FH, *FH, "FH".

PerlIO doc中的更多细节。