1 |
# Dobrica Pavlinusic, <dpavlin@rot13.org> 06/18/07 10:19:50 CEST |
# Dobrica Pavlinusic, <dpavlin@rot13.org> 06/18/07 10:19:50 CEST |
2 |
package CWMP::Server; |
package CWMP::Session; |
3 |
|
|
4 |
use strict; |
use strict; |
5 |
use warnings; |
use warnings; |
26 |
|
|
27 |
=head1 NAME |
=head1 NAME |
28 |
|
|
29 |
CWMP::Server - implement logic of CWMP protocol |
CWMP::Session - implement logic of CWMP protocol |
30 |
|
|
31 |
=head1 METHODS |
=head1 METHODS |
32 |
|
|
33 |
=head2 new |
=head2 new |
34 |
|
|
35 |
my $server = CWMP::Server->new({ |
my $server = CWMP::Session->new({ |
36 |
port => 3333, |
port => 3333, |
37 |
store_path => 'state.db', |
store_path => 'state.db', |
38 |
debug => 1, |
debug => 1, |