while( $lines = <FILE1> )
{
"Do fun stuff here"
}