小编bjb*_*bjb的帖子

同样的问题 这一个为Python编写的，但再次要求的Perl因为-好-他们是不同的脚本语言，也许不同的功能集。

一般来说，我想检测我的 Perl 脚本是否 STDIN我们STDOUT被重定向（最好是前者）。我不想知道文件名，而是想知道调用者是否正在使用重定向，以便我可以向他们显示“帮助文本”（如果不是）。

最好是独立于平台的，但我只能预见这个脚本会在 macOS 或 Linux 上运行。