@lines = map scalar <$file>, 1..10;