File Coverage

blib/lib/Test/Requires/Scanner/Walker.pm

Criterion	Covered	Total	%
statement	14	14	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod	0	1	0.0
total	18	19	94.7

package Test::Requires::Scanner::Walker;
use strict;
use warnings;

use Class::Accessor::Lite (
    new => 1,
    rw  => [qw/
        module_name
        is_in_usedecl
        is_in_test_requires
        is_in_reglist
        is_prev_module_name
        is_in_list
        is_in_hash
        does_garbage_exist
        hash_count
        stashed_module
    /],
);

sub reset {
    my $self = shift;

    $self->module_name('');
    $self->stashed_module('');

    for my $accessor (qw/
        is_in_usedecl
        is_in_test_requires
        is_in_reglist
        is_prev_module_name
        is_in_list
        is_in_hash
        does_garbage_exist
        hash_count
    /) {
        $self->$accessor(0);
    }
}

1;