The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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.