my $line = <$fh>;
my @lines = <$fh>;
my $lines = do { local $/; <$fh> };