view release on metacpan or search on metacpan
t/boilerplate.t view on Meta::CPAN
use strict;
use warnings;
use Test::More tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open my $fh, "<", $filename
or die "couldn't open $filename for reading: $!";
my %violated;
t/boilerplate.t view on Meta::CPAN
} else {
pass("$filename contains no boilerplate text");
}
}
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
view all matches for this distribution
view release on metacpan or search on metacpan
t/boilerplate.t view on Meta::CPAN
use 5.006;
use strict;
use warnings;
use Test::More tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
t/boilerplate.t view on Meta::CPAN
}
}
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
TODO: {
local $TODO = "Need to replace the boilerplate text";
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
module_boilerplate_ok('lib/Apache2/HTML/Detergent.pm');
view all matches for this distribution
view release on metacpan or search on metacpan
t/10-headers.t view on Meta::CPAN
</head><body></body></html>
END
[ "text/html; charset=UTF-8" ]);
{
my $r = Mock_Request->new(filename => 'does_not_exist');
is(Apache2::HttpEquiv::handler($r), DECLINED, 'missing file is not error');
is_deeply($r->_test_results, [ 'text/html' ], 'missing file no changes');
}
view all matches for this distribution
view release on metacpan or search on metacpan
t/boilerplate.t view on Meta::CPAN
use strict;
use warnings;
use Test::More tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open my $fh, "<", $filename
or die "couldn't open $filename for reading: $!";
my %violated;
t/boilerplate.t view on Meta::CPAN
} else {
pass("$filename contains no boilerplate text");
}
}
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
view all matches for this distribution
view release on metacpan or search on metacpan
t/boilerplate.t view on Meta::CPAN
use 5.006;
use strict;
use warnings;
use Test::More tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
t/boilerplate.t view on Meta::CPAN
}
}
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
TODO: {
local $TODO = "Need to replace the boilerplate text";
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
module_boilerplate_ok('lib/Apache2/MimeInfo.pm');
view all matches for this distribution
view release on metacpan or search on metacpan
nextchar|||
ninstr|||
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
not_a_number|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
offer_nice_chunk|||
oopsAV|||
# if !defined(__PATCHLEVEL_H_INCLUDED__) && !(defined(PATCHLEVEL) && defined(SUBVERSION))
# define PERL_PATCHLEVEL_H_IMPLICIT
# include <patchlevel.h>
# endif
# if !(defined(PERL_VERSION) || (defined(SUBVERSION) && defined(PATCHLEVEL)))
# include <could_not_find_Perl_patchlevel.h>
# endif
# ifndef PERL_REVISION
# define PERL_REVISION (5)
/* Replace: 1 */
# define PERL_VERSION PATCHLEVEL
view all matches for this distribution
view release on metacpan or search on metacpan
nextchar|||
ninstr|||
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
not_a_number|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
offer_nice_chunk|||
oopsAV|||
# if !defined(__PATCHLEVEL_H_INCLUDED__) && !(defined(PATCHLEVEL) && defined(SUBVERSION))
# define PERL_PATCHLEVEL_H_IMPLICIT
# include <patchlevel.h>
# endif
# if !(defined(PERL_VERSION) || (defined(SUBVERSION) && defined(PATCHLEVEL)))
# include <could_not_find_Perl_patchlevel.h>
# endif
# ifndef PERL_REVISION
# define PERL_REVISION (5)
/* Replace: 1 */
# define PERL_VERSION PATCHLEVEL
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/PageKit.pm view on Meta::CPAN
$apr->headers_out->{Location} = $pk->{page_id} . '/';
return REDIRECT;
}
$pk->{page_id} = $config->uri_match($pk->{page_id})
|| $config->get_global_attr('not_found_page')
|| $model->pkit_get_default_page;
unless ($pk->page_exists($pk->{page_id})){
# if not_found_page is static, then return DECLINED...
$filename = $pk->static_page_exists($pk->{page_id});
}
}}
if ($filename){
my $require_login = $config->get_page_attr($pk->{page_id},'require_login') || 'no';
lib/Apache2/PageKit.pm view on Meta::CPAN
else {
# check if cookies should be set
my $pkit_check_cookie = $apr->param('pkit_check_cookie');
if(defined($pkit_check_cookie) && $pkit_check_cookie eq 'on'){
# cookies should be set but aren't.
if($config->get_global_attr('cookies_not_set_page')){
# display "cookies are not set" error page.
$pk->{page_id} = $config->get_global_attr('cookies_not_set_page');
$pk->{browser_cache} = 'no';
} else {
# display login page with error message
$pk->{page_id} = $config->get_global_attr('login_page');
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/Proxy.pm view on Meta::CPAN
#$Cache->add_known_html( $url => $response->content_type );
}
else {
#$Cache->add_known_not_html( $url => $response->content_type );
}
$r->log->debug( "$$ 200 for $url, length "
. length( $response->decoded_content )
. " bytes" )
view all matches for this distribution
view release on metacpan or search on metacpan
t/boilerplate.t view on Meta::CPAN
use strict;
use warnings;
use Test::More tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open my $fh, "<", $filename
or die "couldn't open $filename for reading: $!";
my %violated;
t/boilerplate.t view on Meta::CPAN
} else {
pass("$filename contains no boilerplate text");
}
}
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
view all matches for this distribution
view release on metacpan or search on metacpan
nextchar|||
ninstr|||
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
not_a_number|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
offer_nice_chunk|||
oopsAV|||
# if !defined(__PATCHLEVEL_H_INCLUDED__) && !(defined(PATCHLEVEL) && defined(SUBVERSION))
# define PERL_PATCHLEVEL_H_IMPLICIT
# include <patchlevel.h>
# endif
# if !(defined(PERL_VERSION) || (defined(SUBVERSION) && defined(PATCHLEVEL)))
# include <could_not_find_Perl_patchlevel.h>
# endif
# ifndef PERL_REVISION
# define PERL_REVISION (5)
/* Replace: 1 */
# define PERL_VERSION PATCHLEVEL
view all matches for this distribution
view release on metacpan or search on metacpan
t/011directives.t view on Meta::CPAN
ok t_cmp $resp->code, 302, n '/error: code==302';
ok t_cmp $resp->header('Location'),
'http://'.Apache::TestRequest::hostport.'/tsthnd',
n '/error: Location==http://'.Apache::TestRequest::hostport.'/tsthnd';
$resp=GET( '/not_found' );
ok t_cmp $resp->code, 302, n '/not_found: code==302';
ok t_cmp $resp->header('Location'),
'http://'.Apache::TestRequest::hostport.'/tsthnd',
n '/not_found: Location==http://'.Apache::TestRequest::hostport.'/tsthnd';
$resp=GET( '/redr/1' );
ok t_cmp $resp->code, 302, n '/redr/1: code==302';
ok t_cmp $resp->header('Location'),
'http://'.Apache::TestRequest::hostport.'/redr/otto/1',
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/AMFDeviceMonitor.pm view on Meta::CPAN
$f->print("<table>");
$f->print("<tr><td>n.</td><td>device id</td><td>User Agent</td></tr>");
foreach $ua ( sort $cacheSystem->get_keys( 'wurfl-ua' ) )
{
$id =$cacheSystem->restore( 'wurfl-ua', $ua );
if ($ArrayQuery{form} eq "2" && $id eq 'device_not_found'){
$count++;
if ($count > $min - 1 && $count < $max + 1) {
$f->print("<tr><td>$count</td><td>$id</td><td>$ua</td></tr>");
}
}
if ($ArrayQuery{form} eq "1" && $id ne 'device_not_found') {
if ($ArrayQuery{search}) {
if ($id =~ m/$ArrayQuery{search}/i) {
$count++;
if ($count > $min && $count < $max + 1) {
$f->print("<tr><td>$count</td><td><a href=\"?form=3&deviceid=$id\">$id</a></td><td>$ua</td></tr>");
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2_4/AuthCookieMultiDBI.pm view on Meta::CPAN
#===============================================================================
# P R I V A T E F U N C T I O N S
#===============================================================================
##-------------------------------------------------------------------------------
# _log_not_set -- Log that a particular authentication variable was not set.
sub _log_not_set {
my ( $self, $r, $variable ) = @_;
my $auth_name = $r->auth_name;
my $message = "${self} -> $variable not set for auth realm $auth_name";
$r->server->log_error( $message );
lib/Apache2_4/AuthCookieMultiDBI.pm view on Meta::CPAN
$c{$variable}
= defined $value_from_config
? $value_from_config
: $CONFIG_DEFAULT{$variable};
if ( !defined $c{$variable} ) {
$self->_log_not_set( $r, $variable );
}
}
# If we used encryption we need to pull in Crypt::CBC.
if ( $c{'DBI_EncryptionType'} ne 'none' ) {
lib/Apache2_4/AuthCookieMultiDBI.pm view on Meta::CPAN
# _percent_encode -- Percent-encode (like URI encoding) any non-alphanumberics
# in the supplied string.
#
sub _percent_encode {
my ($str) = @_;
my $not_a_word = qr/ ( \W ) /x;
$str =~ s/$not_a_word/ uc sprintf '%%%02x', ord $1 /xmeg;
return $str;
}
#-------------------------------------------------------------------------------
# _percent_decode -- Percent-decode (like URI decoding) any %XX sequences in
view all matches for this distribution
view release on metacpan or search on metacpan
script/_acme-cpanauthors view on Meta::CPAN
# my $q_ps =
# $opt_ps eq '-' ? "\\-" :
# $opt_ps eq '/' ? '/' :
# quotemeta($opt_ps);
#
# my $re_not_ps = "[^$q_ps]";
# my $re_not_dot = "[^.]";
# my $re_not_dot_or_ps = "[^.$q_ps]";
#
# my @res;
# my $p;
# my $after_pathsep;
# while ($str =~ /$RE_WILDCARD_BASH/g) {
script/_acme-cpanauthors view on Meta::CPAN
# } elsif (defined($p = $m{bash_joker})) {
# if ($p eq '?') {
# push @res, '.';
# } elsif ($p eq '*' || $p eq '**' && !$opt_globstar) {
# push @res, $opt_dotglob || (@res && !$after_pathsep) ?
# "$re_not_ps*" : "$re_not_dot_or_ps$re_not_ps*";
# } elsif ($p eq '**') { # and with 'globstar' option set
# if ($opt_dotglob) {
# push @res, '.*';
# } elsif (@res && !$after_pathsep) {
# push @res, "(?:$re_not_ps*)(?:$q_ps+$re_not_dot_or_ps$re_not_ps*)*";
# } else {
# push @res, "(?:$re_not_dot_or_ps$re_not_ps*)(?:$q_ps+$re_not_dot_or_ps$re_not_ps*)*";
# }
# }
#
# } elsif (defined($p = $m{literal_brace_single_element})) {
# push @res, quotemeta($p);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Alice/HTTPD.pm view on Meta::CPAN
my $re = $handler->[0];
if ($req->path_info =~ /$re/) {
return $handler->[1]->($self, $req);
}
}
return $self->not_found($req);
}
sub is_logged_in {
my ($self, $req) = @_;
my $session = $req->env->{"psgix.session"};
lib/App/Alice/HTTPD.pm view on Meta::CPAN
$res->content_length(2);
$res->body('ok');
return $res->finalize;
}
sub not_found {
my ($self, $req) = @_;
$self->app->log(debug => "sending 404 " . $req->path_info);
my $res = $req->new_response(404);
return $res->finalize;
}
view all matches for this distribution
view release on metacpan or search on metacpan
t/sql/sakila-schema.sql view on Meta::CPAN
DELIMITER ;
DELIMITER $$
CREATE PROCEDURE film_not_in_stock(IN p_film_id INT, IN p_store_id INT, OUT p_film_count INT)
READS SQL DATA
BEGIN
SELECT inventory_id
FROM inventory
WHERE film_id = p_film_id
view all matches for this distribution
view release on metacpan or search on metacpan
use App::Anchr;
my $result = test_app( 'App::Anchr' => [qw(help dep)] );
like( $result->stdout, qr{dep}, 'descriptions' );
$result = test_app( 'App::Anchr' => [qw(dep t/not_exists)] );
like( $result->error, qr{need no input}, 'need no inputs' );
$result = test_app( 'App::Anchr' => [qw(dep)] );
like( $result->stdout, qr{OK: find}, 'Check basic infrastructures' );
view all matches for this distribution
view release on metacpan or search on metacpan
{
my $run = testdata::setup::run($temp,'run_1');
my $a = App::ArchiveDevelCover->new(
from=>$run->subdir('does_not_exists'),
to=>$temp->subdir('archive'),
);
trap { $a->run; };
is ( $trap->exit, 0, 'exit() == 0' );
like($trap->stdout,qr/cannot find 'coverage.html'/i,'error message: cannot find coverage.html');
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Asciio/stripes/section_wirl_arrow.pm view on Meta::CPAN
#-----------------------------------------------------------------------------
sub setup
{
my ($self, $arrow_type, $points, $direction, $allow_diagonal_lines, $editable, $not_connectable_start, $not_connectable_end) = @_ ;
if('ARRAY' eq ref $points && @{$points} > 0)
{
my ($start_x, $start_y, $arrows) = (0, 0, []) ;
lib/App/Asciio/stripes/section_wirl_arrow.pm view on Meta::CPAN
# keep data to allow section insertion later
ARROW_TYPE => $arrow_type,
DIRECTION => $direction,
ALLOW_DIAGONAL_LINES => $allow_diagonal_lines,
EDITABLE => $editable,
NOT_CONNECTABLE_START => $not_connectable_start,
NOT_CONNECTABLE_END => $not_connectable_end,
) ;
my ($width, $height) = $self->get_width_and_height() ;
$self->set
(
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<additive_group.min> => I<str>
Only return records where the 'additive_group' field is greater than or equal to specified value.
=item * B<additive_group.not_contains> => I<str>
Only return records where the 'additive_group' field does not contain specified text.
=item * B<additive_group.not_in> => I<array[str]>
Only return records where the 'additive_group' field is not in the specified values.
=item * B<additive_group.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<additive_name.min> => I<str>
Only return records where the 'additive_name' field is greater than or equal to specified value.
=item * B<additive_name.not_contains> => I<str>
Only return records where the 'additive_name' field does not contain specified text.
=item * B<additive_name.not_in> => I<array[str]>
Only return records where the 'additive_name' field is not in the specified values.
=item * B<additive_name.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<food_category_name.min> => I<str>
Only return records where the 'food_category_name' field is greater than or equal to specified value.
=item * B<food_category_name.not_contains> => I<str>
Only return records where the 'food_category_name' field does not contain specified text.
=item * B<food_category_name.not_in> => I<array[str]>
Only return records where the 'food_category_name' field is not in the specified values.
=item * B<food_category_name.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<food_category_number.min> => I<str>
Only return records where the 'food_category_number' field is greater than or equal to specified value.
=item * B<food_category_number.not_contains> => I<str>
Only return records where the 'food_category_number' field does not contain specified text.
=item * B<food_category_number.not_in> => I<array[str]>
Only return records where the 'food_category_number' field is not in the specified values.
=item * B<food_category_number.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<id.min> => I<str>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_contains> => I<str>
Only return records where the 'id' field does not contain specified text.
=item * B<id.not_in> => I<array[str]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<information.min> => I<str>
Only return records where the 'information' field is greater than or equal to specified value.
=item * B<information.not_contains> => I<str>
Only return records where the 'information' field does not contain specified text.
=item * B<information.not_in> => I<array[str]>
Only return records where the 'information' field is not in the specified values.
=item * B<information.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<ins_number.min> => I<str>
Only return records where the 'ins_number' field is greater than or equal to specified value.
=item * B<ins_number.not_contains> => I<str>
Only return records where the 'ins_number' field does not contain specified text.
=item * B<ins_number.not_in> => I<array[str]>
Only return records where the 'ins_number' field is not in the specified values.
=item * B<ins_number.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<limit.min> => I<str>
Only return records where the 'limit' field is greater than or equal to specified value.
=item * B<limit.not_contains> => I<str>
Only return records where the 'limit' field does not contain specified text.
=item * B<limit.not_in> => I<array[str]>
Only return records where the 'limit' field is not in the specified values.
=item * B<limit.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<limit_unit.min> => I<str>
Only return records where the 'limit_unit' field is greater than or equal to specified value.
=item * B<limit_unit.not_contains> => I<str>
Only return records where the 'limit_unit' field does not contain specified text.
=item * B<limit_unit.not_in> => I<array[str]>
Only return records where the 'limit_unit' field is not in the specified values.
=item * B<limit_unit.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<note.min> => I<str>
Only return records where the 'note' field is greater than or equal to specified value.
=item * B<note.not_contains> => I<str>
Only return records where the 'note' field does not contain specified text.
=item * B<note.not_in> => I<array[str]>
Only return records where the 'note' field is not in the specified values.
=item * B<note.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<status.min> => I<str>
Only return records where the 'status' field is greater than or equal to specified value.
=item * B<status.not_contains> => I<str>
Only return records where the 'status' field does not contain specified text.
=item * B<status.not_in> => I<array[str]>
Only return records where the 'status' field is not in the specified values.
=item * B<status.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/FoodCategory.pm view on Meta::CPAN
=item * B<code.min> => I<str>
Only return records where the 'code' field is greater than or equal to specified value.
=item * B<code.not_contains> => I<str>
Only return records where the 'code' field does not contain specified text.
=item * B<code.not_in> => I<array[str]>
Only return records where the 'code' field is not in the specified values.
=item * B<code.not_matches> => I<str>
Only return records where the 'code' field does not match specified regular expression.
=item * B<code.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodCategory.pm view on Meta::CPAN
=item * B<name.min> => I<str>
Only return records where the 'name' field is greater than or equal to specified value.
=item * B<name.not_contains> => I<str>
Only return records where the 'name' field does not contain specified text.
=item * B<name.not_in> => I<array[str]>
Only return records where the 'name' field is not in the specified values.
=item * B<name.not_matches> => I<str>
Only return records where the 'name' field does not match specified regular expression.
=item * B<name.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodCategory.pm view on Meta::CPAN
=item * B<status.min> => I<str>
Only return records where the 'status' field is greater than or equal to specified value.
=item * B<status.not_contains> => I<str>
Only return records where the 'status' field does not contain specified text.
=item * B<status.not_in> => I<array[str]>
Only return records where the 'status' field is not in the specified values.
=item * B<status.not_matches> => I<str>
Only return records where the 'status' field does not match specified regular expression.
=item * B<status.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodCategory.pm view on Meta::CPAN
=item * B<summary.min> => I<str>
Only return records where the 'summary' field is greater than or equal to specified value.
=item * B<summary.not_contains> => I<str>
Only return records where the 'summary' field does not contain specified text.
=item * B<summary.not_in> => I<array[str]>
Only return records where the 'summary' field is not in the specified values.
=item * B<summary.not_matches> => I<str>
Only return records where the 'summary' field does not match specified regular expression.
=item * B<summary.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<country_of_origin.min> => I<str>
Only return records where the 'country_of_origin' field is greater than or equal to specified value.
=item * B<country_of_origin.not_contains> => I<str>
Only return records where the 'country_of_origin' field does not contain specified text.
=item * B<country_of_origin.not_in> => I<array[str]>
Only return records where the 'country_of_origin' field is not in the specified values.
=item * B<country_of_origin.not_matches> => I<str>
Only return records where the 'country_of_origin' field does not match specified regular expression.
=item * B<country_of_origin.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<id.min> => I<int>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_in> => I<array[int]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<int>
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<is_herbal.min> => I<str>
Only return records where the 'is_herbal' field is greater than or equal to specified value.
=item * B<is_herbal.not_contains> => I<str>
Only return records where the 'is_herbal' field does not contain specified text.
=item * B<is_herbal.not_in> => I<array[str]>
Only return records where the 'is_herbal' field is not in the specified values.
=item * B<is_herbal.not_matches> => I<str>
Only return records where the 'is_herbal' field does not match specified regular expression.
=item * B<is_herbal.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<name.min> => I<str>
Only return records where the 'name' field is greater than or equal to specified value.
=item * B<name.not_contains> => I<str>
Only return records where the 'name' field does not contain specified text.
=item * B<name.not_in> => I<array[str]>
Only return records where the 'name' field is not in the specified values.
=item * B<name.not_matches> => I<str>
Only return records where the 'name' field does not match specified regular expression.
=item * B<name.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<origin.min> => I<str>
Only return records where the 'origin' field is greater than or equal to specified value.
=item * B<origin.not_contains> => I<str>
Only return records where the 'origin' field does not contain specified text.
=item * B<origin.not_in> => I<array[str]>
Only return records where the 'origin' field is not in the specified values.
=item * B<origin.not_matches> => I<str>
Only return records where the 'origin' field does not match specified regular expression.
=item * B<origin.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<status.min> => I<str>
Only return records where the 'status' field is greater than or equal to specified value.
=item * B<status.not_contains> => I<str>
Only return records where the 'status' field does not contain specified text.
=item * B<status.not_in> => I<array[str]>
Only return records where the 'status' field is not in the specified values.
=item * B<status.not_matches> => I<str>
Only return records where the 'status' field does not match specified regular expression.
=item * B<status.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodIngredient.pm view on Meta::CPAN
=item * B<type.min> => I<str>
Only return records where the 'type' field is greater than or equal to specified value.
=item * B<type.not_contains> => I<str>
Only return records where the 'type' field does not contain specified text.
=item * B<type.not_in> => I<array[str]>
Only return records where the 'type' field is not in the specified values.
=item * B<type.not_matches> => I<str>
Only return records where the 'type' field does not match specified regular expression.
=item * B<type.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/FoodType.pm view on Meta::CPAN
=item * B<code.min> => I<str>
Only return records where the 'code' field is greater than or equal to specified value.
=item * B<code.not_contains> => I<str>
Only return records where the 'code' field does not contain specified text.
=item * B<code.not_in> => I<array[str]>
Only return records where the 'code' field is not in the specified values.
=item * B<code.not_matches> => I<str>
Only return records where the 'code' field does not match specified regular expression.
=item * B<code.xmax> => I<str>
lib/App/BPOMUtils/Table/FoodType.pm view on Meta::CPAN
=item * B<summary.min> => I<str>
Only return records where the 'summary' field is greater than or equal to specified value.
=item * B<summary.not_contains> => I<str>
Only return records where the 'summary' field does not contain specified text.
=item * B<summary.not_in> => I<array[str]>
Only return records where the 'summary' field is not in the specified values.
=item * B<summary.not_matches> => I<str>
Only return records where the 'summary' field does not match specified regular expression.
=item * B<summary.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/MicrobeInput.pm view on Meta::CPAN
=item * B<category.min> => I<str>
Only return records where the 'category' field is greater than or equal to specified value.
=item * B<category.not_contains> => I<str>
Only return records where the 'category' field does not contain specified text.
=item * B<category.not_in> => I<array[str]>
Only return records where the 'category' field is not in the specified values.
=item * B<category.not_matches> => I<str>
Only return records where the 'category' field does not match specified regular expression.
=item * B<category.xmax> => I<str>
lib/App/BPOMUtils/Table/MicrobeInput.pm view on Meta::CPAN
=item * B<characteristic.min> => I<str>
Only return records where the 'characteristic' field is greater than or equal to specified value.
=item * B<characteristic.not_contains> => I<str>
Only return records where the 'characteristic' field does not contain specified text.
=item * B<characteristic.not_in> => I<array[str]>
Only return records where the 'characteristic' field is not in the specified values.
=item * B<characteristic.not_matches> => I<str>
Only return records where the 'characteristic' field does not match specified regular expression.
=item * B<characteristic.xmax> => I<str>
lib/App/BPOMUtils/Table/MicrobeInput.pm view on Meta::CPAN
=item * B<id.min> => I<int>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_in> => I<array[int]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<int>
lib/App/BPOMUtils/Table/MicrobeInput.pm view on Meta::CPAN
=item * B<lower_limit.min> => I<str>
Only return records where the 'lower_limit' field is greater than or equal to specified value.
=item * B<lower_limit.not_contains> => I<str>
Only return records where the 'lower_limit' field does not contain specified text.
=item * B<lower_limit.not_in> => I<array[str]>
Only return records where the 'lower_limit' field is not in the specified values.
=item * B<lower_limit.not_matches> => I<str>
Only return records where the 'lower_limit' field does not match specified regular expression.
=item * B<lower_limit.xmax> => I<str>
lib/App/BPOMUtils/Table/MicrobeInput.pm view on Meta::CPAN
=item * B<upper_limit.min> => I<str>
Only return records where the 'upper_limit' field is greater than or equal to specified value.
=item * B<upper_limit.not_contains> => I<str>
Only return records where the 'upper_limit' field does not contain specified text.
=item * B<upper_limit.not_in> => I<array[str]>
Only return records where the 'upper_limit' field is not in the specified values.
=item * B<upper_limit.not_matches> => I<str>
Only return records where the 'upper_limit' field does not match specified regular expression.
=item * B<upper_limit.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/RegCodePrefix.pm view on Meta::CPAN
=item * B<code.min> => I<str>
Only return records where the 'code' field is greater than or equal to specified value.
=item * B<code.not_contains> => I<str>
Only return records where the 'code' field does not contain specified text.
=item * B<code.not_in> => I<array[str]>
Only return records where the 'code' field is not in the specified values.
=item * B<code.xmax> => I<str>
lib/App/BPOMUtils/Table/RegCodePrefix.pm view on Meta::CPAN
=item * B<division.min> => I<str>
Only return records where the 'division' field is greater than or equal to specified value.
=item * B<division.not_contains> => I<str>
Only return records where the 'division' field does not contain specified text.
=item * B<division.not_in> => I<array[str]>
Only return records where the 'division' field is not in the specified values.
=item * B<division.xmax> => I<str>
lib/App/BPOMUtils/Table/RegCodePrefix.pm view on Meta::CPAN
=item * B<summary_eng.min> => I<str>
Only return records where the 'summary_eng' field is greater than or equal to specified value.
=item * B<summary_eng.not_contains> => I<str>
Only return records where the 'summary_eng' field does not contain specified text.
=item * B<summary_eng.not_in> => I<array[str]>
Only return records where the 'summary_eng' field is not in the specified values.
=item * B<summary_eng.xmax> => I<str>
lib/App/BPOMUtils/Table/RegCodePrefix.pm view on Meta::CPAN
=item * B<summary_ind.min> => I<str>
Only return records where the 'summary_ind' field is greater than or equal to specified value.
=item * B<summary_ind.not_contains> => I<str>
Only return records where the 'summary_ind' field does not contain specified text.
=item * B<summary_ind.not_in> => I<array[str]>
Only return records where the 'summary_ind' field is not in the specified values.
=item * B<summary_ind.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<id.min> => I<int>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_in> => I<array[int]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<int>
lib/App/BPOMUtils/Table/FoodAdditive.pm view on Meta::CPAN
=item * B<name.min> => I<str>
Only return records where the 'name' field is greater than or equal to specified value.
=item * B<name.not_contains> => I<str>
Only return records where the 'name' field does not contain specified text.
=item * B<name.not_in> => I<array[str]>
Only return records where the 'name' field is not in the specified values.
=item * B<name.not_matches> => I<str>
Only return records where the 'name' field does not match specified regular expression.
=item * B<name.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<id.min> => I<str>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_contains> => I<str>
Only return records where the 'id' field does not contain specified text.
=item * B<id.not_in> => I<array[str]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.not_matches> => I<str>
Only return records where the 'id' field does not match specified regular expression.
=item * B<id.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<name.min> => I<str>
Only return records where the 'name' field is greater than or equal to specified value.
=item * B<name.not_contains> => I<str>
Only return records where the 'name' field does not contain specified text.
=item * B<name.not_in> => I<array[str]>
Only return records where the 'name' field is not in the specified values.
=item * B<name.not_matches> => I<str>
Only return records where the 'name' field does not match specified regular expression.
=item * B<name.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<code.min> => I<str>
Only return records where the 'code' field is greater than or equal to specified value.
=item * B<code.not_contains> => I<str>
Only return records where the 'code' field does not contain specified text.
=item * B<code.not_in> => I<array[str]>
Only return records where the 'code' field is not in the specified values.
=item * B<code.not_matches> => I<str>
Only return records where the 'code' field does not match specified regular expression.
=item * B<code.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<name.min> => I<str>
Only return records where the 'name' field is greater than or equal to specified value.
=item * B<name.not_contains> => I<str>
Only return records where the 'name' field does not contain specified text.
=item * B<name.not_in> => I<array[str]>
Only return records where the 'name' field is not in the specified values.
=item * B<name.not_matches> => I<str>
Only return records where the 'name' field does not match specified regular expression.
=item * B<name.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<status.min> => I<str>
Only return records where the 'status' field is greater than or equal to specified value.
=item * B<status.not_contains> => I<str>
Only return records where the 'status' field does not contain specified text.
=item * B<status.not_in> => I<array[str]>
Only return records where the 'status' field is not in the specified values.
=item * B<status.not_matches> => I<str>
Only return records where the 'status' field does not match specified regular expression.
=item * B<status.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<summary.min> => I<str>
Only return records where the 'summary' field is greater than or equal to specified value.
=item * B<summary.not_contains> => I<str>
Only return records where the 'summary' field does not contain specified text.
=item * B<summary.not_in> => I<array[str]>
Only return records where the 'summary' field is not in the specified values.
=item * B<summary.not_matches> => I<str>
Only return records where the 'summary' field does not match specified regular expression.
=item * B<summary.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<country_of_origin.min> => I<str>
Only return records where the 'country_of_origin' field is greater than or equal to specified value.
=item * B<country_of_origin.not_contains> => I<str>
Only return records where the 'country_of_origin' field does not contain specified text.
=item * B<country_of_origin.not_in> => I<array[str]>
Only return records where the 'country_of_origin' field is not in the specified values.
=item * B<country_of_origin.not_matches> => I<str>
Only return records where the 'country_of_origin' field does not match specified regular expression.
=item * B<country_of_origin.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<id.min> => I<int>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_in> => I<array[int]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<int>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<is_herbal.min> => I<str>
Only return records where the 'is_herbal' field is greater than or equal to specified value.
=item * B<is_herbal.not_contains> => I<str>
Only return records where the 'is_herbal' field does not contain specified text.
=item * B<is_herbal.not_in> => I<array[str]>
Only return records where the 'is_herbal' field is not in the specified values.
=item * B<is_herbal.not_matches> => I<str>
Only return records where the 'is_herbal' field does not match specified regular expression.
=item * B<is_herbal.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<name.min> => I<str>
Only return records where the 'name' field is greater than or equal to specified value.
=item * B<name.not_contains> => I<str>
Only return records where the 'name' field does not contain specified text.
=item * B<name.not_in> => I<array[str]>
Only return records where the 'name' field is not in the specified values.
=item * B<name.not_matches> => I<str>
Only return records where the 'name' field does not match specified regular expression.
=item * B<name.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<origin.min> => I<str>
Only return records where the 'origin' field is greater than or equal to specified value.
=item * B<origin.not_contains> => I<str>
Only return records where the 'origin' field does not contain specified text.
=item * B<origin.not_in> => I<array[str]>
Only return records where the 'origin' field is not in the specified values.
=item * B<origin.not_matches> => I<str>
Only return records where the 'origin' field does not match specified regular expression.
=item * B<origin.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<status.min> => I<str>
Only return records where the 'status' field is greater than or equal to specified value.
=item * B<status.not_contains> => I<str>
Only return records where the 'status' field does not contain specified text.
=item * B<status.not_in> => I<array[str]>
Only return records where the 'status' field is not in the specified values.
=item * B<status.not_matches> => I<str>
Only return records where the 'status' field does not match specified regular expression.
=item * B<status.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<type.min> => I<str>
Only return records where the 'type' field is greater than or equal to specified value.
=item * B<type.not_contains> => I<str>
Only return records where the 'type' field does not contain specified text.
=item * B<type.not_in> => I<array[str]>
Only return records where the 'type' field is not in the specified values.
=item * B<type.not_matches> => I<str>
Only return records where the 'type' field does not match specified regular expression.
=item * B<type.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<category.min> => I<str>
Only return records where the 'category' field is greater than or equal to specified value.
=item * B<category.not_contains> => I<str>
Only return records where the 'category' field does not contain specified text.
=item * B<category.not_in> => I<array[str]>
Only return records where the 'category' field is not in the specified values.
=item * B<category.not_matches> => I<str>
Only return records where the 'category' field does not match specified regular expression.
=item * B<category.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<characteristic.min> => I<str>
Only return records where the 'characteristic' field is greater than or equal to specified value.
=item * B<characteristic.not_contains> => I<str>
Only return records where the 'characteristic' field does not contain specified text.
=item * B<characteristic.not_in> => I<array[str]>
Only return records where the 'characteristic' field is not in the specified values.
=item * B<characteristic.not_matches> => I<str>
Only return records where the 'characteristic' field does not match specified regular expression.
=item * B<characteristic.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<id.min> => I<int>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_in> => I<array[int]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<int>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<lower_limit.min> => I<str>
Only return records where the 'lower_limit' field is greater than or equal to specified value.
=item * B<lower_limit.not_contains> => I<str>
Only return records where the 'lower_limit' field does not contain specified text.
=item * B<lower_limit.not_in> => I<array[str]>
Only return records where the 'lower_limit' field is not in the specified values.
=item * B<lower_limit.not_matches> => I<str>
Only return records where the 'lower_limit' field does not match specified regular expression.
=item * B<lower_limit.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<upper_limit.min> => I<str>
Only return records where the 'upper_limit' field is greater than or equal to specified value.
=item * B<upper_limit.not_contains> => I<str>
Only return records where the 'upper_limit' field does not contain specified text.
=item * B<upper_limit.not_in> => I<array[str]>
Only return records where the 'upper_limit' field is not in the specified values.
=item * B<upper_limit.not_matches> => I<str>
Only return records where the 'upper_limit' field does not match specified regular expression.
=item * B<upper_limit.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<category.min> => I<str>
Only return records where the 'category' field is greater than or equal to specified value.
=item * B<category.not_contains> => I<str>
Only return records where the 'category' field does not contain specified text.
=item * B<category.not_in> => I<array[str]>
Only return records where the 'category' field is not in the specified values.
=item * B<category.not_matches> => I<str>
Only return records where the 'category' field does not match specified regular expression.
=item * B<category.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<characteristic.min> => I<str>
Only return records where the 'characteristic' field is greater than or equal to specified value.
=item * B<characteristic.not_contains> => I<str>
Only return records where the 'characteristic' field does not contain specified text.
=item * B<characteristic.not_in> => I<array[str]>
Only return records where the 'characteristic' field is not in the specified values.
=item * B<characteristic.not_matches> => I<str>
Only return records where the 'characteristic' field does not match specified regular expression.
=item * B<characteristic.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<id.min> => I<int>
Only return records where the 'id' field is greater than or equal to specified value.
=item * B<id.not_in> => I<array[int]>
Only return records where the 'id' field is not in the specified values.
=item * B<id.xmax> => I<int>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<lower_limit.min> => I<str>
Only return records where the 'lower_limit' field is greater than or equal to specified value.
=item * B<lower_limit.not_contains> => I<str>
Only return records where the 'lower_limit' field does not contain specified text.
=item * B<lower_limit.not_in> => I<array[str]>
Only return records where the 'lower_limit' field is not in the specified values.
=item * B<lower_limit.not_matches> => I<str>
Only return records where the 'lower_limit' field does not match specified regular expression.
=item * B<lower_limit.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<upper_limit.min> => I<str>
Only return records where the 'upper_limit' field is greater than or equal to specified value.
=item * B<upper_limit.not_contains> => I<str>
Only return records where the 'upper_limit' field does not contain specified text.
=item * B<upper_limit.not_in> => I<array[str]>
Only return records where the 'upper_limit' field is not in the specified values.
=item * B<upper_limit.not_matches> => I<str>
Only return records where the 'upper_limit' field does not match specified regular expression.
=item * B<upper_limit.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<code.min> => I<str>
Only return records where the 'code' field is greater than or equal to specified value.
=item * B<code.not_contains> => I<str>
Only return records where the 'code' field does not contain specified text.
=item * B<code.not_in> => I<array[str]>
Only return records where the 'code' field is not in the specified values.
=item * B<code.not_matches> => I<str>
Only return records where the 'code' field does not match specified regular expression.
=item * B<code.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<summary.min> => I<str>
Only return records where the 'summary' field is greater than or equal to specified value.
=item * B<summary.not_contains> => I<str>
Only return records where the 'summary' field does not contain specified text.
=item * B<summary.not_in> => I<array[str]>
Only return records where the 'summary' field is not in the specified values.
=item * B<summary.not_matches> => I<str>
Only return records where the 'summary' field does not match specified regular expression.
=item * B<summary.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<code.min> => I<str>
Only return records where the 'code' field is greater than or equal to specified value.
=item * B<code.not_contains> => I<str>
Only return records where the 'code' field does not contain specified text.
=item * B<code.not_in> => I<array[str]>
Only return records where the 'code' field is not in the specified values.
=item * B<code.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<division.min> => I<str>
Only return records where the 'division' field is greater than or equal to specified value.
=item * B<division.not_contains> => I<str>
Only return records where the 'division' field does not contain specified text.
=item * B<division.not_in> => I<array[str]>
Only return records where the 'division' field is not in the specified values.
=item * B<division.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<summary_eng.min> => I<str>
Only return records where the 'summary_eng' field is greater than or equal to specified value.
=item * B<summary_eng.not_contains> => I<str>
Only return records where the 'summary_eng' field does not contain specified text.
=item * B<summary_eng.not_in> => I<array[str]>
Only return records where the 'summary_eng' field is not in the specified values.
=item * B<summary_eng.xmax> => I<str>
lib/App/BPOMUtils.pm view on Meta::CPAN
=item * B<summary_ind.min> => I<str>
Only return records where the 'summary_ind' field is greater than or equal to specified value.
=item * B<summary_ind.not_contains> => I<str>
Only return records where the 'summary_ind' field does not contain specified text.
=item * B<summary_ind.not_in> => I<array[str]>
Only return records where the 'summary_ind' field is not in the specified values.
=item * B<summary_ind.xmax> => I<str>
view all matches for this distribution
view release on metacpan or search on metacpan
script/pkgbase.pl view on Meta::CPAN
# Prepends pkgname
const our $repo_re => qr/(?:([\/])\/)?/;
const our $type_re => qr/(?:(lib)\:)?/;
const our %sep_re => ( ver => qr/(\=|[\<\>]\=?)/, dssc => qr/(:\s*(.+))?/ );
const our $not_pkgver_rew => quotemeta(':/-') . '\s';
const our $fpath_re =>
qr/^(?:\/)?([a-zA-Z0-9\@_\+\.\+]+\/)?([a-zA-Z0-9\@_\+\.\+]+)$/;
# Apppends pkgname (cmpop, ver, description)
view all matches for this distribution
view release on metacpan or search on metacpan
t/boilerplate.t view on Meta::CPAN
use strict;
use warnings;
use Test::More;
use Test::Warnings;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
t/boilerplate.t view on Meta::CPAN
}
sub module_boilerplate_ok {
my ($module) = @_;
subtest $module => sub {
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
'module description' => qr/One-line description of module/,
'description' => qr/A full description of the module/,
t/boilerplate.t view on Meta::CPAN
);
};
}
subtest 'README' => sub {
not_in_file_ok((-f 'README' ? 'README' : 'README.md') =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
};
subtest 'Changes' => sub {
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
};
module_boilerplate_ok('bin/bamboo');
view all matches for this distribution