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 |