核心Perl中是否有任何内容可以自动从"<>"运算符中选择行?

DVK*_*DVK 13 perl input

我在进行Perl编码时遇到的一个小烦恼就是必须记住选择从输入中读取的行.是的,经过多年的编码,它几乎是自动记住这样做,但仍然很烦人.

Perl中是否存在任何编译指示,模块或其他任何内容(强烈优选的核心模块),它们会自动选择使用<>运算符读取的每一行?

tch*_*ist 5

除了你已经提到的那些非常糟糕的源过滤器,我恐怕我不知道在这里你的目的是什么"黑客".你认为这些明显的解决方案中的任何一个都是"黑客"吗?

  1. 覆盖*CORE::readline当前包
  2. 覆盖 *CORE::GLOBAL::readline所有包裹
  3. 使用自定义READLINE方法处理与类的关联
  4. 运营商超载<>运营商

你试过那些吗?

其中,我认为第一个,或者可能是第二个,最有可能以最少量的大惊小怪做你想做的事.

请注意,所有这四个解决方案除了纯粹的Perl之外什么都不需要.它们甚至不需要任何核心模块,更不用说任何CPAN模块了.