Actually he's not reading from STDIN. He's reading from the first file named on the command line.

"The first rule of Perl club is you do not talk about Perl club."
-- Chip Salzenberg