Parent Directory | Revision Log | Patch
revision 114 by dpavlin, Sun Aug 2 03:31:39 2009 UTC | revision 118 by dpavlin, Mon Aug 3 08:52:32 2009 UTC | |
---|---|---|
# | Line 19 use IO::Socket::INET; | Line 19 use IO::Socket::INET; |
19 | use File::Slurp; | use File::Slurp; |
20 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
21 | use Net::Ping; | use Net::Ping; |
use Module::Refresh; | ||
22 | ||
23 | use lib '..'; | use lib '..'; |
24 | use Net::DHCP::Packet; | use Net::DHCP::Packet; |
# | Line 198 sub start { | Line 197 sub start { |
197 | print "DHCP listen on ",$sock->sockhost,":",$sock->sockport,"\n"; | print "DHCP listen on ",$sock->sockhost,":",$sock->sockport,"\n"; |
198 | ||
199 | while (1) { | while (1) { |
Module::Refresh->refresh; | ||
200 | process_packet $sock; | process_packet $sock; |
201 | } | } |
202 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |