CPAN->GREP


51 to 75 of more than 1000 distributions (1.94 seconds)
Tk-TextHighlight-1.1.1/lib/Tk/ROTextHighlight.pm
	$cw->ConfigSpecs(
		-autoindent => [qw/PASSIVE autoindent Autoindent/, 0],
		-match => [qw/PASSIVE match Match/, '[]{}()'],
		-autoindent => [qw/PASSIVE autoindent Autoindent/, 0],
		-match => [qw/PASSIVE match Match/, '[]{}()'],
		-matchoptions	=> [qw/METHOD matchoptions Matchoptions/, 
		-match => [qw/PASSIVE match Match/, '[]{}()'],
		-matchoptions	=> [qw/METHOD matchoptions Matchoptions/, 
			[-background => 'red', -foreground => 'yellow']],
15 more matches »
TURNERJW/Tk-TextHighlight-1.1.1 1 more file »
DBIx-Class-LookupColumn-0.10/t/01-basic.t
use DDP;
use Test::DBIx::Class -config_path => [[qw/t etc schema /], [qw/t etc schema1 schema1/]], 'User';
use DDP;
use Test::DBIx::Class -config_path => [[qw/t etc schema /], [qw/t etc schema1 schema1/]], 'User';
RUBATTEL/DBIx-Class-LookupColumn-0.10 17 more files »
Data-FeatureFactory-0.0405/Data-FeatureFactory/lib/Data/FeatureFactory.pm
 # specify the features to evaluate and gather the result in binary form
 my @vector = $f->evaluate([qw(no_of_letters first_letter)], 'binary', 'foo');
SIXTEASE/Data-FeatureFactory-0.0405 2 more files »
Perinci-Sub-Gen-AccessTable-0.57/lib/Perinci/Sub/Gen/AccessTable.pm
        # for bool, it's not that important.
        unless ($ftype ~~ [qw/array bool/]) {
            _add_arg(
 my $countries = [
     ['cn', 'China', 'Cina', [qw/panda/]],
     ['id', 'Indonesia', 'Indonesia', [qw/bali tropical/]],
     ['cn', 'China', 'Cina', [qw/panda/]],
     ['id', 'Indonesia', 'Indonesia', [qw/bali tropical/]],
     ['sg', 'Singapore', 'Singapura', [qw/tropical/]],
2 more matches »
PERLANCAR/Perinci-Sub-Gen-AccessTable-0.57 5 more files »
Tk-MListbox-1.11/MListbox-1.11/docs/MListbox.html
<pre>$ml->insert("end",
    [qw/Row0:Col0 Row0:Col1 Row0:Col2 Row0:Col3/],
    [qw/Row1:Col0 Row1:Col1 Row1:Col2 Row1:Col3/],
    [qw/Row0:Col0 Row0:Col1 Row0:Col2 Row0:Col3/],
    [qw/Row1:Col0 Row1:Col1 Row1:Col2 Row1:Col3/],
    [qw/Row2:Col0 Row2:Col1 Row2:Col2 Row2:Col3/]
    [qw/Row1:Col0 Row1:Col1 Row1:Col2 Row1:Col3/],
    [qw/Row2:Col0 Row2:Col1 Row2:Col2 Row2:Col3/]
);
RCS/Tk-MListbox-1.11 2 more files »
HTML-Mason-1.56/lib/HTML/Mason/ApacheHandler.pm
use HTML::Mason::Exceptions( abbr => [qw(param_error error)] );
use File::Spec;
use HTML::Mason::Exceptions( abbr => [qw(param_error system_error error)] );
use HTML::Mason::Interp;
DROLSKY/HTML-Mason-1.56 27 more files »
Locale-CLDR-Locales-Fr-v0.29.0/t/15-Calendars.t
my $months = $locale->month_format_wide();
is_deeply ($months, [qw( janvier février mars avril mai juin juillet août septembre octobre novembre décembre )], 'Month
$months = $locale->month_format_abbreviated();
is_deeply ($months, [qw( janv. févr. mars avr. mai juin juil. août sept. oct. nov. déc. )], 'Month format abbreviated');
$months = $locale->month_format_narrow();
is_deeply ($months, [qw( J F M A M J J A S O N D )], 'Month format narrow');
$months = $locale->month_stand_alone_wide();
16 more matches »
JGNI/Locale-CLDR-Locales-Fr-v0.29.0 1 more file »
WebAPI-DBIC-0.004002/lib/WebAPI/DBIC/Resource/Base.pm
use Moo;
use namespace::clean -except => [qw(meta)];
use MooX::StrictConstructor;
TIMB/WebAPI-DBIC-0.004002 30 more files »
XML-SAX-Base-1.09/BuildSAXBase.pl
    my %EVENT_SPEC = (
                        start_document          => [qw(ContentHandler DocumentHandler Handler)],
                        end_document            => [qw(Co
=> [qw(ContentHandler DocumentHandler Handler)],
                        end_document            => [qw(ContentHandler DocumentHandler Handler)],
                        start_element           => [qw(Co
=> [qw(ContentHandler DocumentHandler Handler)],
                        start_element           => [qw(ContentHandler DocumentHandler Handler)],
                        end_element             => [qw(Co
30 more matches »
GRANTM/XML-SAX-Base-1.09
OpenVZ-0.01/lib/OpenVZ/Vzctl.pm
        umount    => [],
        exec      => [qw( command )],
        exec2     => [qw( command )],
        exec      => [qw( command )],
        exec2     => [qw( command )],
        runscript => [qw( script )],
        exec2     => [qw( command )],
        runscript => [qw( script )],
        start     => [qw( [force] [wait] )],
11 more matches »
AYOUNG/OpenVZ-0.01 3 more files »
Test-Chado-v4.1.1/lib/Test/Chado.pm
    groups => {
        'schema'  => [qw/chado_schema reload_schema drop_schema/],
        'manager' => [
SIDD/Test-Chado-v4.1.1 9 more files »
Tie-Trace-0.17/Build.PL
    script_files => [glob('script/*'), glob('bin/*')],
    c_source     => [qw()],
    PL_files => {},
KTAT/Tie-Trace-0.17 5 more files »
Reaction-0.002005/lib/ComponentUI/Controller/TestModel/Bar.pm
      ViewPort => {
        enable_order_by => [qw/name foo published_at/],
        coerce_order_by => { foo => ['foo.last_name', 'foo.first_name'] },
ARCANEZ/Reaction-0.002005 19 more files »
PPIx-EditorTools-0.19/t/06-camelcasing.t
	# test expected ucfirst
	[qw(abc abc 0)],
	[qw(abc Abc 1)],
	[qw(abc abc 0)],
	[qw(abc Abc 1)],
	[qw(Abc Abc 0)],
	[qw(abc Abc 1)],
	[qw(Abc Abc 0)],
	[qw(Abc Abc 1)],
27 more matches »
SZABGAB/PPIx-EditorTools-0.19 2 more files »
Aniki-1.06/eg/synopsis.pl
    limit    => 1,
    prefetch => [qw/modules/],
})->first;
KARUPA/Aniki-1.06 8 more files »
Data-Paging-0.01/Build.PL
    script_files => [glob('script/*'), glob('bin/*')],
    c_source     => [qw()],
    PL_files => {},
AINAME/Data-Paging-0.01 6 more files »
Array-PatternMatcher-0.04/PatternMatcher.pm
 
 $pattern = [qw(X   Y)] ;
 $input   = [   77, 45 ] ;
 {
     my $pattern = ['a', [qw(X *)], 'd'] ;
     my $input   = ['a', 'b', 'c',  'd'] ;
 
     my $pattern = ['a', [qw(X *)], [qw(Y *)], 'd'] ;
     my $input   = ['a', 'b', 'c', 'd'] ;
19 more matches »
TBONE/Array-PatternMatcher-0.04 3 more files »
App-setop-0.11/t/01-basics.t
    test_setop(
        args     => [qw/f1 f2/],
        exitcode => 99,
    test_setop(
        args     => [qw/--op foo f1 f2/],
        exitcode => 99,
    test_setop(
        args     => [qw/--union/],
        exitcode => 99,
29 more matches »
PERLANCAR/App-setop-0.11
Mail-Bulkmail-3.12/Bulkmail.pm
 my $list = [qw(jim@jimandkoka.com thomasoniii@yahoo.com)];
 $bulk->LIST($list);
 $bulk->banned([qw(jim@jimandkoka.com jimandkoka.com)]);
 my $bulk = Mail::Bulkmail->new(
 	"LIST" 		=> [qw(test@mydomain.com me@mydomain.com test2@mydomain.com)],
 	"Subject"	=> "A test message",
JIMT/Mail-Bulkmail-3.12 3 more files »
Music-Canon-2.04/lib/Music/Canon.pm
  # Major scale by default
  $self->modal_scale_in( [ [qw(2 2 1 2 2 2 1)], [qw(2 2 1 2 2 2 1)] ] )
    if !$self->has_modal_scale_in;
  # Major scale by default
  $self->modal_scale_in( [ [qw(2 2 1 2 2 2 1)], [qw(2 2 1 2 2 2 1)] ] )
    if !$self->has_modal_scale_in;
    if !$self->has_modal_scale_in;
  $self->modal_scale_out( [ [qw(2 2 1 2 2 2 1)], [qw(2 2 1 2 2 2 1)] ] )
    if !$self->has_modal_scale_out;
2 more matches »
JMATES/Music-Canon-2.04 2 more files »
Locale-CLDR-Locales-Br-v0.29.0/t/15-Calendars.t
my $months = $locale->month_format_wide();
is_deeply ($months, [qw( Genver Cʼhwevrer Meurzh Ebrel Mae Mezheven Gouere Eost Gwengolo Here Du Kerzu )], 'Month format w
$months = $locale->month_format_abbreviated();
is_deeply ($months, [qw( Gen. Cʼhwe. Meur. Ebr. Mae Mezh. Goue. Eost Gwen. Here Du Kzu. )], 'Month format abbreviated');
$months = $locale->month_format_narrow();
is_deeply ($months, [qw( 01 02 03 04 05 06 07 08 09 10 11 12 )], 'Month format narrow');
$months = $locale->month_stand_alone_wide();
14 more matches »
JGNI/Locale-CLDR-Locales-Br-v0.29.0 1 more file »
RDF-Query-2.918/bin/deparse.pl
		print "\n# Algebra:\n";
		print Data::Dumper->Dump([$query->as_hash], [qw(query)]);
	}
GWILLIAMS/RDF-Query-2.918 10 more files »
Test-Modern-0.013/lib/Test/Modern.pm
our %EXPORT_TAGS = (
	more     => [qw(
		ok is isnt like unlike is_deeply cmp_ok new_ok isa_ok can_ok
	)],
	fatal    => [qw( exception )],
	warnings => [qw( warnings warning )],
	fatal    => [qw( exception )],
	warnings => [qw( warnings warning )],
	api      => [qw( public_ok import_ok class_api_ok )],
13 more matches »
TOBYINK/Test-Modern-0.013 4 more files »
Config-Model-TkUI-1.363/Build.PL
   add_to_cleanup => [qw/stderr.log wr_data/] ,
  );
DDUMONT/Config-Model-TkUI-1.363 6 more files »
Music-VoiceGen-0.02/eg/auditcontext
for my $trialn ( 1 .. $TRIALS ) {
    $voice->context( [qw/a b c/] );
    print $voice->rand(), "\n";
JMATES/Music-VoiceGen-0.02 3 more files »
Home · About