while (<FILE>) {
 ...
 # $_ is the current line
}