23        callback => { data =>
 24             sub {
 25                 my ($io, $host) = @_;
 26                 return 0 unless defined $line;  ################ MOVED LINE #####################
 27                 chomp( my $line = <$io> );
 28                 $Qout->enqueue( $line );    ## send work to walker
 29                 return !0;
 30             }
 31         },