Why not adopt me?
This distribution is up for adoption!
If you're interested then please contact the PAUSE module admins via
email.
NAME
Path::IsDev::Role::Heuristic::AnyFile - Positive Heuristic if a path contains one of any of a list of files
VERSION
version 0.6.0
SYNOPSIS
package Some::Heuristic;
use Role::Tiny::With;
with 'Path::IsDev::Role::Heuristic::AnyFile';
# Match if $PATH contains any of the named children as files
sub files {
return qw( Foo Bar Baz .bashrc )
}
1;
ROLE REQUIRES
files
Any consuming classes must implement this method
returns : A list of file basenames to match
METHODS
matches
Implements matches
for Path::IsDev::Role::Heuristic
if ( $class->matches($result_object) ) {
# one of the items in $class->files matched
# $result_object has been modified to reflect that
# _debug has been done where relevant
}
else {
# no matches
# $result_object has been modified with diagnostic data
# _debug has been done where relevant
}
AUTHOR
Kent Fredric <kentfredric@gmail.com>
COPYRIGHT AND LICENSE
This software is copyright (c) 2013 by Kent Fredric <kentfredric@gmail.com>.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.