--- lib/PXElator/tftpd.pm 2009/08/12 23:59:01 208 +++ lib/PXElator/tftpd.pm 2009/08/19 10:58:02 261 @@ -43,8 +43,6 @@ sub tftp_request { my $request = shift; - server->refresh; - warn 'request: ', dump( $request ) if $debug; my $ip = $request->{_REQUEST_}->{PeerAddr}; @@ -132,6 +130,7 @@ # wait for any request (RRQ or WRQ) if(my $request = $listener->waitRQ()) { + server->refresh; tftp_request $request; } elsif ( my $error = Net::TFTPd->error ) { warn $error;