while (<$fh>){
    ...
}

##</code><code>##

for (@fh){
    ...
}