while( my $line=<$handle> and time() < $time+20 and $finished==0)