while ( defined( $_ = $opts{-handle}->getline ) ) {

##</code><code>##