It just sits there because that's what you've told it to do. The while( <> ) { ... } tells perl to read from the standard input. If you don't give a filename it'll just sit there very patiently waiting for you to type something at it.