Result:
Your query is still running in background...Search in progress...
at this time found 607 distributions and 827 files matching your query.
Next refresh should show more results. ( run in 3.204 )
Next refresh should show more results. ( run in 3.204 )
Device-HID
view release on metacpan or search on metacpan
XS/ppport.h view on Meta::CPAN
$rv;
}
sub usage
{
my($usage) = do { local(@ARGV,$/)=($0); <> } =~ /^=head\d$HS+SYNOPSIS\s*^(.*?)\s*^=/ms;
my %M = ( 'I' => '*' );
$usage =~ s/^\s*perl\s+\S+/$^X $0/;
$usage =~ s/([A-Z])<([^>]+)>/$M{$1}$2$M{$1}/g;
print <<ENDUSAGE;
view all matches for this distribution
Device-PiFace
view release on metacpan or search on metacpan
$rv;
}
sub usage
{
my($usage) = do { local(@ARGV,$/)=($0); <> } =~ /^=head\d$HS+SYNOPSIS\s*^(.*?)\s*^=/ms;
my %M = ( 'I' => '*' );
$usage =~ s/^\s*perl\s+\S+/$^X $0/;
$usage =~ s/([A-Z])<([^>]+)>/$M{$1}$2$M{$1}/g;
print <<ENDUSAGE;
view all matches for this distribution
Device-SerialPort-Xmodem
view release on metacpan or search on metacpan
print " --- hint for $func ---\n", $hint;
}
sub usage
{
my($usage) = do { local(@ARGV,$/)=($0); <> } =~ /^=head\d$HS+SYNOPSIS\s*^(.*?)\s*^=/ms;
my %M = ( 'I' => '*' );
$usage =~ s/^\s*perl\s+\S+/$^X $0/;
$usage =~ s/([A-Z])<([^>]+)>/$M{$1}$2$M{$1}/g;
print <<ENDUSAGE;
view all matches for this distribution
Device-Velleman-K8055-libk8055
view release on metacpan or search on metacpan
$rv;
}
sub usage
{
my($usage) = do { local(@ARGV,$/)=($0); <> } =~ /^=head\d$HS+SYNOPSIS\s*^(.*?)\s*^=/ms;
my %M = ( 'I' => '*' );
$usage =~ s/^\s*perl\s+\S+/$^X $0/;
$usage =~ s/([A-Z])<([^>]+)>/$M{$1}$2$M{$1}/g;
print <<ENDUSAGE;
view all matches for this distribution
Digest-FarmHash
view release on metacpan or search on metacpan
$rv;
}
sub usage
{
my($usage) = do { local(@ARGV,$/)=($0); <> } =~ /^=head\d$HS+SYNOPSIS\s*^(.*?)\s*^=/ms;
my %M = ( 'I' => '*' );
$usage =~ s/^\s*perl\s+\S+/$^X $0/;
$usage =~ s/([A-Z])<([^>]+)>/$M{$1}$2$M{$1}/g;
print <<ENDUSAGE;
view all matches for this distribution
Digest-MurmurHash3
view release on metacpan or search on metacpan
$rv;
}
sub usage
{
my($usage) = do { local(@ARGV,$/)=($0); <> } =~ /^=head\d$HS+SYNOPSIS\s*^(.*?)\s*^=/ms;
my %M = ( 'I' => '*' );
$usage =~ s/^\s*perl\s+\S+/$^X $0/;
$usage =~ s/([A-Z])<([^>]+)>/$M{$1}$2$M{$1}/g;
print <<ENDUSAGE;
view all matches for this distribution
Digest-SHA-PurePerl
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
my $warn_0 = 'BEGIN { $^W = 0 }';
{
eval "require warnings; import warnings";
$use_warnings = $@ ? 0 : 1;
local(@ARGV) = ($PM, $SHASUMPP);
while (<>) {
if (
(!$use_warnings && /^(use|no) warnings\b/) ||
( $use_warnings && /^\Q$warn_1\E # use warnings\b/) ||
( $use_warnings && /^\Q$warn_0\E # no warnings\b/)) {
view all matches for this distribution
Dist-Dzpl
view release on metacpan or search on metacpan
lib/Dist/Dzpl.pm view on Meta::CPAN
my $app = Dist::Zilla::App->new;
$app->{__chrome__} = $zilla->chrome;
$app->{__PACKAGE__}{zilla} = $zilla; # Cover case 1...
$app->{'Dist::Zilla::App'}{zilla} = $zilla; # ...and case 2
{
local @ARGV = @arguments;
$app->run;
}
}
else {
die "Dist::Zilla cannot do \"$do\"" unless $zilla->can( $do );
view all matches for this distribution( run in 3.204 seconds using v1.00-cache-2.02-grep-82fe00e-cpan-72ae3ad1e6da )