Parent Directory | Revision Log | Patch
revision 366 by dpavlin, Sun Aug 30 11:45:59 2009 UTC | revision 482 by dpavlin, Sat Jan 23 18:31:14 2010 UTC | |
---|---|---|
# | Line 5 use strict; | Line 5 use strict; |
5 | ||
6 | use IO::Socket::INET; | use IO::Socket::INET; |
7 | use Regexp::Common qw/net/; | use Regexp::Common qw/net/; |
8 | use CouchDB; | use store; |
9 | ||
10 | use client; | use client; |
11 | use server; | use server; |
# | Line 38 sub power_on { | Line 38 sub power_on { |
38 | send($sock, $packet, 0, $sock_addr); | send($sock, $packet, 0, $sock_addr); |
39 | close ($sock); | close ($sock); |
40 | ||
41 | CouchDB::audit( $target, { ip => $target, mac => $mac } ); | store::audit( $target, { ip => $target, mac => $mac } ); |
42 | } | } |
43 | ||
44 | 1; | 1; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |