File Coverage

blib/lib/App/MigrateToTest2V0.pm

Criterion	Covered	Total	%
statement	8	13	61.5
branch			n/a
condition			n/a
subroutine	3	4	75.0
pod	0	1	0.0
total	11	18	61.1

package App::MigrateToTest2V0;
use 5.008001;
use strict;
use warnings;

our $VERSION = "0.01";

our @rules = qw(
    App::MigrateToTest2V0::Rule::ReplaceUseTestMoreToUseTest2V0
    App::MigrateToTest2V0::Rule::ReplaceIsDeeplyToIs
    App::MigrateToTest2V0::Rule::ReplaceIsaOkHASHOrArrayToRefOk
    App::MigrateToTest2V0::Rule::Translate2ndArgumentOfIsaOkWithArrayRef
    App::MigrateToTest2V0::Rule::AvoidNameConflictWithTestDeep
);

sub apply {
    my ($class, $doc) = @_;

    for my $rule_class (@rules) {
        eval "require $rule_class";
        $rule_class->apply($doc);
    }

    $doc->save($doc->filename);
}

1;
__END__