perl -e '$| = 1; print while <>'
vs
perl -e '$| = 1; print foreach <>'
You will find that the first spits back your lines interactively. The second has to wait to slurp up everything you have to say before it starts printing.
Should you ever need to write a filter for dealing with a large amount of data, be very, very careful to use while instead of foreach!
But a random note. If you check the benchmark, you will find that keys ran faster, 423.73 iterations per second vs 356.01. If memory is not a constraint, then for hashes of this size, foreach is faster! |