3.8. <STDIN> in List ContextOne previously seen operator that returns a different value in an array context is the line-input operator, <STDIN>. As described earlier, <STDIN> returns the next line of input in a scalar context. Now, in list context, this operator returns all of the remaining lines up to the end of file. Each line is returned as a separate element of the list as in this example: @lines = <STDIN>; # read standard input in list context When the input is coming from a file, this will read the rest of the file. But how can there be an end-of-file when the input comes from the keyboard? On Unix and similar systems, including Linux and Mac OS X, you'll normally type a Ctrl-D[
If the person running the program types three lines and presses the proper keys needed to indicate end-of-file, the array will have with three elements. Each element will be a string that ends in a newline, corresponding to the three newline-terminated lines entered. Wouldn't it be nice if, having read those lines, you could chomp the newlines all at once? It turns out that if you give chomp an array holding a list of lines, it will remove the newlines from each item in the list as in this example: @lines = <STDIN>; # Read all the lines chomp(@lines); # discard all the newline characters But the more common way to write that is with code similar to what we used earlier: chomp(@lines = <STDIN>); # Read the lines, not the newlines Though you're welcome to write your code either way in the privacy of your own cubicle, most Perl programmers will expect the second, more compact notation. It may be obvious to you that once these lines of input have been read, they can't be re-read.[*] Once you've reached end-of-file, there's no more input out there to read.
And what happens if the input is coming from a 400 MB log file? The line input operator reads all of the lines, gobbling up lots of memory.[
|