while (<FILE1>) {
      # this
      @lines = $_;
}

##</code><code>##

while(<FILE1>) {
	push @lines, $_;
}

##</code><code>##

@lines = <FILE1>;