in reply to Seeking balance from the <> operator

while ( readline($self->{fhFrom}) ) {