# FH is our example file handle
while(<FH>){
    #action on each line
} 

##</code><code>##

my @file = <FH>;
foreach my $line (@file){
    # action on each line
}