来自STDIN管道的perl输入仅适用于脚本前面的perl

Question

I am attempting to read from STDIN with a perl script.

Here is the script I am using for testing:

#!/usr/bin/perl

foreach $line (<>) 
{
  print $line;
}

So from the command prompt, I type:

> cat somefile | testscript
>

It returns nothing with no error.

I then type the following:

> cat somefile | perl testscript
> *the contents of the file are printed line by line*

I really do not want the users to have to append perl in front of the script if I do not have to.

Thanks for reading.

Answer 1

I think you run two different versions of Perl. What is the output of "which perl"?