my $line = <$fh>;

##</code><code>##

my @lines = <$fh>;

##</code><code>##

array</i> context, but this is a frowned upon term as the variables needn't be an array. 

<code>
my( $v1, $v2, $v3, $v4, $v5 ) = <$fh>;

##</code><code>##

my @lines = scalar <$fh>;

##</code><code>##

print join '', 'fred', 'bill', undef, 'john';;
Use of uninitialized value in join or string at (eval 3)
fredbilljohn