ref()的文档提到了几个可能的返回值.我明白了其中大部分,但不是REF,IO和LVALUE.我如何编写Perl代码ref以返回这些值?
在阅读了关于typeglobs和文件句柄的文档后,我接近了IO这段代码:
open(INPUT, '<', 'foo.pl');
print ref(*INPUT{IO}), "\n"; # Prints IO::Handle
Run Code Online (Sandbox Code Playgroud)
因为REF和LVALUE我尝试了几个奇怪的结构,但没有成功.