134 |
my $sock = $prop->{client}; |
my $sock = $prop->{client}; |
135 |
confess "no sock in ", ref( $self ) unless $sock; |
confess "no sock in ", ref( $self ) unless $sock; |
136 |
|
|
137 |
warn "default CPE queue ( " . join(",",@{$prop->{default_queue}}) . " )" if defined($prop->{default_queue}); |
warn "default CPE queue ( " . join(",",@{$prop->{default_queue}}) . " )\n" if defined($prop->{default_queue}); |
138 |
|
|
139 |
my $session = CWMP::Session->new({ |
my $session = CWMP::Session->new({ |
140 |
sock => $sock, |
sock => $sock, |