Parent Directory | Revision Log | Patch
revision 394 by dpavlin, Mon Sep 7 21:53:45 2009 UTC | revision 395 by dpavlin, Tue Sep 8 17:28:28 2009 UTC | |
---|---|---|
# | Line 6 use autodie; | Line 6 use autodie; |
6 | ||
7 | use File::Slurp; | use File::Slurp; |
8 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
9 | use File::Path; | |
10 | ||
11 | use server; | use server; |
12 | use format; | use format; |
# | Line 174 sub remove { | Line 175 sub remove { |
175 | if ( my $mac = mac_from_ip $ip ) { | if ( my $mac = mac_from_ip $ip ) { |
176 | unlink "$server::conf/mac/$mac"; | unlink "$server::conf/mac/$mac"; |
177 | } | } |
178 | rmdir "$server::conf/ip/$ip"; | rmtree "$server::conf/ip/$ip"; |
179 | } | } |
180 | ||
181 | sub arp_mac_dev { | sub arp_mac_dev { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |