elsif ( $class eq 'miner' ) { my ( $t, $d ) = split /\s+/, $payload, 2; if ($d) { lock %{ $self{'miner'}{$t} }; trc 'dbg', 'miner data', $t, length $d; $self{'miner'}{$t}{'expi'} = time() + $cnf{'period'}; $self{'miner'}{$t}{'data'} = $d; } }