while(<>)

##</code><code>##

while(<>) {
    print;
}

##</code><code>##

$ ./weird.pl sample.txt

whereas 

$ ./weird.pl <sample.txt

or

$ cat sample.txt | ./weird.pl