package Sip::Configuration;
use strict;
-use English;
use warnings;
use XML::Simple qw(:strict);
return $self->{listeners}->{$portstr};
}
-#
-# Testing
-#
-
-{
- no warnings qw(once);
- eval join('',<main::DATA>) || die $@ unless caller();
-}
-
1;
__END__