$line = <$file>;

##</code><code>##

@lines = <$file>;