File Coverage

blib/lib/VS/RuleEngine/Input.pm

Criterion	Covered	Total	%
statement	13	17	76.4
branch	2	4	50.0
condition	3	6	50.0
subroutine	4	5	80.0
pod	2	2	100.0
total	24	34	70.5

package VS::RuleEngine::Input;

use strict;
use warnings;

use Carp qw(croak);

sub new {
    my $self = shift;
    $self = ref $self || $self;
    croak "new() should not be called as a function" if !$self;
    croak "Class '$self' does not override new()";
}

sub value {
    my $self = shift;
    $self = ref $self || $self;
    croak "value() should not be called as a function" if !$self;
    croak "Class '$self' does not override value()";
}

1;
__END__