File Coverage

blib/lib/HH/Unispool/Config/Entry/RemoteSystem/6.pm

Criterion	Covered	Total	%
statement	112	141	79.4
branch	39	78	50.0
condition	11	27	40.7
subroutine	19	19	100.0
pod	11	11	100.0
total	192	276	69.5

package HH::Unispool::Config::Entry::RemoteSystem::6;

use 5.006;
use base qw( HH::Unispool::Config::Entry::RemoteSystem );
use strict;
use warnings;
use AutoLoader qw(AUTOLOAD);
use Error qw(:try);

# Used by _value_is_allowed
our %ALLOW_ISA = (
    'os' => [ 'HH::Unispool::Config::OS' ],
);

# Used by _value_is_allowed
our %ALLOW_REF = (
);

# Used by _value_is_allowed
our %ALLOW_RX = (
    'block_delay' => [ '^\d*$' ],
    'remote_node_name' => [ '^[\w\.]+$' ],
);

# Used by _value_is_allowed
our %ALLOW_VALUE = (
);

# Used by _initialize
our %DEFAULT_VALUE = (
    'block_delay' => 0,
    'initially_open' => 1,
);

# Package version
our ($VERSION) = '$Revision: 0.3 $' =~ /\$Revision:\s+([^\s]+)/;

1;

__END__