$ ./weird.pl sample.txt

is fundamentally different to

$ ./weird.pl <sample.txt

or

$ cat sample.txt | ./weird.pl
[download]

the first passes a filename as argument while the latter two pipe the content of this file into STDIN.

See ARGV for a way to solve this.