view release on metacpan or  search on metacpan

t/WrapScope/ConfigGenerator/examine_files.t  view on Meta::CPAN

        name     => 'everything',
        args     => [ files => [ '*', '*/*' ], ],
        expected => [qw/
            main::run_foo
            TopLvl1::top_1_stuff
            TopLvl1::top_1_something
            TopLvl1::_top_1_private
            TopLvl2::top_2_stuff
            TopLvl2::top_2_something
            TopLvl2::_top_2_private
            Secret::Encryption::get_private_keys
            Secret::Encryption::hash
            Secret::Passwords::get_passwords
        /],
    },
    {
        name     => 'ignore dir',
        args     => [
            files  => [ '*', '*/*' ],
            ignore => [ 'Secret/*' ],
        ],

t/WrapScope/ConfigGenerator/examine_files.t  view on Meta::CPAN

    {
        name     => '.pm only',
        args     => [ files => [ '*.pm', '*/*.pm' ], ],
        expected => [qw/
            TopLvl1::top_1_stuff
            TopLvl1::top_1_something
            TopLvl1::_top_1_private
            TopLvl2::top_2_stuff
            TopLvl2::top_2_something
            TopLvl2::_top_2_private
            Secret::Encryption::get_private_keys
            Secret::Encryption::hash
            Secret::Passwords::get_passwords
        /],
    },
    {
        name => 'exclude subs',
        args => [
            files => [ '*.pm', '*/*.pm' ],
            exclude => [qw/
                TopLvl1::top_1_something
                TopLvl2::top_2_something
            /],
        ],
        expected => [qw/
            TopLvl1::top_1_stuff
            TopLvl1::_top_1_private
            TopLvl2::top_2_stuff
            TopLvl2::_top_2_private
            Secret::Encryption::get_private_keys
            Secret::Encryption::hash
            Secret::Passwords::get_passwords
        /],
    },
    {
        name => 'no private subs',
        args => [
            files   => [ '*.pm', '*/*.pm' ],
            filters => ['exclude_private'],
        ],
        expected => [qw/
            TopLvl1::top_1_stuff
            TopLvl1::top_1_something
            TopLvl2::top_2_stuff
            TopLvl2::top_2_something
            Secret::Encryption::get_private_keys
            Secret::Encryption::hash
            Secret::Passwords::get_passwords
        /],
    },
    {
        name     => 'overlapping globs',
        args     => [ files => [ '*.pm', 'Top*' ], ],
        expected => [qw/
            TopLvl1::top_1_stuff
            TopLvl1::top_1_something

t/WrapScope/ConfigGenerator/sample_tree/Secret/Encryption.pm  view on Meta::CPAN

package Secret::Encryption;

sub get_private_keys { }
sub hash             { }

1;