while(( my $line=$handle->getline() ) && time() < $time+20 && $finished==0)