changeset 61 | cfb15e4d62a4 |
parent 60 | 6e2dd2cc846d |
child 65 | d0bd2fd2c468 |
60:6e2dd2cc846d | 61:cfb15e4d62a4 |
---|---|
403 |
403 |
404 $sString=~m%([^,]*),(.*)%; |
404 $sString=~m%([^,]*),(.*)%; |
405 my $nPid=$1; |
405 my $nPid=$1; |
406 my $nTimestamp=$2; |
406 my $nTimestamp=$2; |
407 |
407 |
408 if (time()-$nTimestamp<=$nMAX_LETTER_AGE_SECONDS) |
408 if (time()-$nTimestamp<=$nMAX_LETTER_AGE_SECONDS or $nTimestamp == 0 or $nTimestamp == -1) |
409 { |
409 { |
410 $hsPidsAndTimestamps{$sLetter} = $sString; |
410 $hsPidsAndTimestamps{$sLetter} = $sString; |
411 } |
411 } |
412 else |
412 else |
413 { |
413 { |