@lines = map scalar <$file>, 1..10; [download]
In reply to Re: reading several lines in a gulp by Anonymous Monk in thread reading several lines in a gulp by John M. Dlugosz