App-perlfind

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Class::Trigger" : "0",
            "Module::Pluggable" : "0",
            "Pod::Cpandoc" : "0",
            "Pod::Functions" : "0",
            "parent" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Test::Compile" : "0",
            "Test::Differences" : "0"
         }
      }
   },
   "release_status" : "stable",
   "resources" : {
      "bugtracker" : {
         "web" : "https://github.com/marcelgruenauer/App-perlfind/issues"
      },
      "homepage" : "https://github.com/marcelgruenauer/App-perlfind",
      "repository" : {

META.yml  view on Meta::CPAN

---
abstract: 'A more knowledgeable perldoc'
author:
  - 'The following persons are the authors of all the files provided in'
build_requires:
  Test::Compile: '0'
  Test::Differences: '0'
configure_requires:
  Module::Build::Tiny: '0.039'
dynamic_config: 0
generated_by: 'Dist::Zilla version 5.036, Dist::Milla version v1.0.15, CPAN::Meta::Converter version 2.150001'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: App-perlfind
no_index:

cpanfile  view on Meta::CPAN

requires 'Class::Trigger';
requires 'Module::Pluggable';
requires 'Pod::Cpandoc';
requires 'Pod::Functions';
requires 'parent';

on test => sub {
    requires 'Test::Compile';
    requires 'Test::Differences';
};

t/find_matches.t  view on Meta::CPAN

#!/usr/bin/env perl
use warnings;
use strict;
use Test::More;
use Test::Differences;
use App::perlfind;
my %expect = (

    # The first element of the value is what the query gets rewritten as.
    'xor'                    => [ 'xor'                     => qw(perlop) ],
    'foreach'                => [ 'foreach'                 => qw(perlsyn) ],
    'isa'                    => [ 'isa'                     => qw(perlobj) ],
    'TIEARRAY'               => [ 'TIEARRAY'                => qw(perltie) ],
    'AUTOLOAD'               => [ 'AUTOLOAD'                => qw(perlsub) ],
    'INPUT_RECORD_SEPARATOR' => [ '$INPUT_RECORD_SEPARATOR' => qw(perlvar) ],