@lines = <$handle>;  # Reads the whole file
$line = <$handle>;   # Reads the next record