Result:
found more than 916 distributions - search limited to the first 2001 files matching your query
( run in 1.023 )
Attribute-Generator
view release on metacpan or search on metacpan
inc/Test/More.pm view on Meta::CPAN
$tb->_unoverload_str(\$e1, \$e2);
# Either they're both references or both not.
my $same_ref = !(!ref $e1 xor !ref $e2);
my $not_ref = (!ref $e1 and !ref $e2);
if( defined $e1 xor defined $e2 ) {
$ok = 0;
}
elsif ( _dne($e1) xor _dne($e2) ) {
$ok = 0;
}
elsif ( $same_ref and ($e1 eq $e2) ) {
$ok = 1;
}
elsif ( $not_ref ) {
push @Data_Stack, { type => '', vals => [$e1, $e2] };
$ok = 0;
}
else {
if( $Refs_Seen{$e1} ) {
Audio-AMaMP
view release on metacpan or search on metacpan
#ifndef PERL_REVISION
# ifndef __PATCHLEVEL_H_INCLUDED__
# include <patchlevel.h>
# endif
# if !(defined(PERL_VERSION) || (SUBVERSION > 0 && defined(PATCHLEVEL)))
# include <could_not_find_Perl_patchlevel.h>
# endif
# ifndef PERL_REVISION
# define PERL_REVISION (5)
/* Replace: 1 */
# define PERL_VERSION PATCHLEVEL
Audio-BASSXS
view release on metacpan or search on metacpan
# ifndef __PATCHLEVEL_H_INCLUDED__
# 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
Audio-C4Stream-Mixer
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
Audio-ConvTools
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]/,
);
}
Audio-DSP
view release on metacpan or search on metacpan
#include <sys/soundcard.h>
#define AUDIO_FILE_BUFFER_SIZE 4096
static int
not_here(char *s)
{
croak("%s not implemented on this architecture", s);
return -1;
}
case 'A':
if (strEQ(name, "AFMT_A_LAW"))
#ifdef AFMT_A_LAW
return AFMT_A_LAW;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_IMA_ADPCM"))
#ifdef AFMT_IMA_ADPCM
return AFMT_IMA_ADPCM;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_MPEG"))
#ifdef AFMT_MPEG
return AFMT_MPEG;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_MU_LAW"))
#ifdef AFMT_MU_LAW
return AFMT_MU_LAW;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_QUERY"))
#ifdef AFMT_QUERY
return AFMT_QUERY;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_S16_BE"))
#ifdef AFMT_S16_BE
return AFMT_S16_BE;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_S16_LE"))
#ifdef AFMT_S16_LE
return AFMT_S16_LE;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_S16_NE"))
#ifdef AFMT_S16_NE
return AFMT_S16_NE;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_S8"))
#ifdef AFMT_S8
return AFMT_S8;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_U16_BE"))
#ifdef AFMT_U16_BE
return AFMT_U16_BE;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_U16_LE"))
#ifdef AFMT_U16_LE
return AFMT_U16_LE;
#else
goto not_there;
#endif
if (strEQ(name, "AFMT_U8"))
#ifdef AFMT_U8
return AFMT_U8;
#else
goto not_there;
#endif
break;
}
errno = EINVAL;
return 0;
not_there:
errno = ENOENT;
return 0;
}
int _audioformat (SV* fmt) {
Audio-ESD
view release on metacpan or search on metacpan
#include "XSUB.h"
#include <esd.h>
static int
not_here(char *s)
{
croak("%s not implemented on this architecture", s);
return -1;
}
case 'E':
if (strEQ(name, "ESD_ADPCM"))
#ifdef ESD_ADPCM
return ESD_ADPCM;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_BITS16"))
#ifdef ESD_BITS16
return ESD_BITS16;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_BITS8"))
#ifdef ESD_BITS8
return ESD_BITS8;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_BUF_SIZE"))
#ifdef ESD_BUF_SIZE
return ESD_BUF_SIZE;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_DEFAULT_PORT"))
#ifdef ESD_DEFAULT_PORT
return ESD_DEFAULT_PORT;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_DEFAULT_RATE"))
#ifdef ESD_DEFAULT_RATE
return ESD_DEFAULT_RATE;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_ENDIAN_KEY"))
#ifdef ESD_ENDIAN_KEY
return ESD_ENDIAN_KEY;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_KEY_LEN"))
#ifdef ESD_KEY_LEN
return ESD_KEY_LEN;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_LOOP"))
#ifdef ESD_LOOP
return ESD_LOOP;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_MASK_BITS"))
#ifdef ESD_MASK_BITS
return ESD_MASK_BITS;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_MASK_CHAN"))
#ifdef ESD_MASK_CHAN
return ESD_MASK_CHAN;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_MASK_FUNC"))
#ifdef ESD_MASK_FUNC
return ESD_MASK_FUNC;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_MASK_MODE"))
#ifdef ESD_MASK_MODE
return ESD_MASK_MODE;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_MONITOR"))
#ifdef ESD_MONITOR
return ESD_MONITOR;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_MONO"))
#ifdef ESD_MONO
return ESD_MONO;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_NAME_MAX"))
#ifdef ESD_NAME_MAX
return ESD_NAME_MAX;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_PLAY"))
#ifdef ESD_PLAY
return ESD_PLAY;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_RECORD"))
#ifdef ESD_RECORD
return ESD_RECORD;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_SAMPLE"))
#ifdef ESD_SAMPLE
return ESD_SAMPLE;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_STEREO"))
#ifdef ESD_STEREO
return ESD_STEREO;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_STOP"))
#ifdef ESD_STOP
return ESD_STOP;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_STREAM"))
#ifdef ESD_STREAM
return ESD_STREAM;
#else
goto not_there;
#endif
if (strEQ(name, "ESD_VOLUME_BASE"))
#ifdef ESD_VOLUME_BASE
return ESD_VOLUME_BASE;
#else
goto not_there;
#endif
break;
case 'F':
break;
case 'G':
break;
}
errno = EINVAL;
return 0;
not_there:
errno = ENOENT;
return 0;
}
typedef int SysRet;
Audio-FindChunks
view release on metacpan or search on metacpan
ninstr|||n
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
noperl_die|||vn
not_a_number|||
not_incrementable|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
oopsAV|||
oopsHV|||
watch|||
whichsig_pvn||5.015004|
whichsig_pv||5.015004|
whichsig_sv||5.015004|
whichsig|||
win32_croak_not_implemented|||n
with_queued_errors|||
wrap_op_checker||5.015008|
write_to_stderr|||
xs_boot_epilog|||
xs_handshake|||vn
# 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
Audio-GSM
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
Audio-LADSPA
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
oopsAV|||
oopsCV|||
# 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
Audio-LibSampleRate
view release on metacpan or search on metacpan
nextchar|||
ninstr|||n
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
not_a_number|||
not_incrementable|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
oopsAV|||
oopsHV|||
watch|||
whichsig_pvn||5.015004|
whichsig_pv||5.015004|
whichsig_sv||5.015004|
whichsig|||
win32_croak_not_implemented|||n
with_queued_errors|||
wrap_op_checker||5.015008|
write_to_stderr|||
xmldump_all_perl|||
xmldump_all|||
# 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
Audio-M4P
view release on metacpan or search on metacpan
lib/Audio/M4P/QuickTime.pm view on Meta::CPAN
COMMENT => 'CMT',
TRKN => 'TRACKNUM',
SONG => 'TITLE',
);
our @m4p_not_m4a_atom_types = qw( sinf cnID apID atID plID geID akID ---- );
our @apple_user_id_atoms = qw( pinf apID cnID atID plID geID sfID akID purd ownr );
our %iTMS_dict_meta_types = (
copyright => 'cprt',
comments => '©cmt',
lib/Audio/M4P/QuickTime.pm view on Meta::CPAN
sub ConvertDrmsToMp4a {
my ($self) = @_;
my $diff = 0;
my $drms = $self->FindAtom('drms') or return;
foreach my $a (@m4p_not_m4a_atom_types) {
my @unwanted = $self->FindAtom($a) or next;
foreach my $u (@unwanted) { $diff += $u->size; $u->selfDelete() }
}
print "Shrunk file by $diff bytes during conversion\n" if $self->{DEBUG};
$self->FixStco( $diff, $drms->start );
Audio-MPC
view release on metacpan or search on metacpan
# ifndef __PATCHLEVEL_H_INCLUDED__
# 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
Audio-MPEG
view release on metacpan or search on metacpan
#define Min(A, B) ((A) < (B) ? (A) : (B))
#define Max(A, B) ((A) > (B) ? (A) : (B))
static int
not_here(char *s)
{
croak("%s not implemented on this architecture", s);
return -1;
}
Audio-Mad
view release on metacpan or search on metacpan
constants.h view on Meta::CPAN
static int
not_here(char *s)
{
croak("%s not implemented on this architecture", s);
return -1;
}
Audio-Metadata
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
}
}
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/Audio/Metadata/Flac.pm');
Audio-MikMod
view release on metacpan or search on metacpan
#include "XSUB.h"
#include <mikmod.h>
static int
not_here(char *s) {
croak("%s not implemented on this architecture", s);
return -1;
}
static double
case 'L':
if (strEQ(name, "LIBMIKMOD_REVISION"))
#ifdef LIBMIKMOD_REVISION
return LIBMIKMOD_REVISION;
#else
goto not_there;
#endif
if (strEQ(name, "LIBMIKMOD_VERSION"))
#ifdef LIBMIKMOD_VERSION
return LIBMIKMOD_VERSION;
#else
goto not_there;
#endif
if (strEQ(name, "LIBMIKMOD_VERSION_MAJOR"))
#ifdef LIBMIKMOD_VERSION_MAJOR
return LIBMIKMOD_VERSION_MAJOR;
#else
goto not_there;
#endif
if (strEQ(name, "LIBMIKMOD_VERSION_MINOR"))
#ifdef LIBMIKMOD_VERSION_MINOR
return LIBMIKMOD_VERSION_MINOR;
#else
goto not_there;
#endif
break;
case 'M':
break;
case 'N':
case 'S':
if (strEQ(name, "SFX_CRITICAL"))
#ifdef SFX_CRITICAL
return SFX_CRITICAL;
#else
goto not_there;
#endif
break;
case 'T':
break;
case 'U':
break;
}
errno = EINVAL;
return 0;
not_there:
errno = ENOENT;
return 0;
}
MODULE = Audio::MikMod PACKAGE = Audio::MikMod
Audio-Mixer
view release on metacpan or search on metacpan
#include "XSUB.h"
#include "Mix.h"
static int
not_here(char *s)
{
croak("%s not implemented on this architecture", s);
return -1;
}
case 'M':
if (strEQ(name, "MIXER"))
#ifdef MIXER
return MIXER;
#else
goto not_there;
#endif
break;
case 'N':
break;
case 'O':
break;
}
errno = EINVAL;
return 0;
not_there:
errno = ENOENT;
return 0;
}
Audio-Nama
view release on metacpan or search on metacpan
lib/Audio/Nama.pm view on Meta::CPAN
# comments.
#
# - A value _must_ be supplied for each 'leaf' field.
# For example "mixer_out_format: cd-stereo"
#
# - A value must _not_ be supplied for nodes, i.e.
# 'device:'. The value for 'device' is the entire indented
# data structure that follows in subsequent lines.
#
# - white space *is* significant. Two spaces indent is
# required for each sublevel.
Audio-Opusfile
view release on metacpan or search on metacpan
ninstr|||n
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
noperl_die|||vn
not_a_number|||
not_incrementable|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
oopsAV|||
oopsHV|||
watch|||
whichsig_pvn||5.015004|
whichsig_pv||5.015004|
whichsig_sv||5.015004|
whichsig|||
win32_croak_not_implemented|||n
with_queued_errors|||
wrap_op_checker||5.015008|
write_to_stderr|||
xs_boot_epilog|||
xs_handshake|||vn
# 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
Audio-Play-MPG123
view release on metacpan or search on metacpan
mpg123/mpg123.c view on Meta::CPAN
{
param.outmode=DECODE_AUDIOFILE;
OutputDescriptor=1;
}
void not_compiled(char *arg)
{
fprintf(stderr,"Option '-T / --realtime' not compiled into this binary\n");
}
/* Please note: GLO_NUM expects point to LONG! */
mpg123/mpg123.c view on Meta::CPAN
{'u', "auth", GLO_ARG | GLO_CHAR, 0, &httpauth, 0},
#endif
#if defined(SET_RT)
{'T', "realtime", 0, 0, ¶m.realtime, TRUE },
#else
{'T', "realtime", 0, not_compiled, 0, 0 },
#endif
{0 , "title", 0, 0, ¶m.xterm_title, TRUE },
{'w', "wav", GLO_ARG | GLO_CHAR, set_wav, 0 , 0 },
{0 , "cdr", GLO_ARG | GLO_CHAR, set_cdr, 0 , 0 },
{0 , "au", GLO_ARG | GLO_CHAR, set_au, 0 , 0 },
Audio-PortAudio
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
oopsAV|||
oopsCV|||
# 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
Audio-Scan
view release on metacpan or search on metacpan
include/ppport.h view on Meta::CPAN
nextchar|||
ninstr|||
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
not_a_number|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
oopsAV|||
oopsCV|||
include/ppport.h view on Meta::CPAN
# 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
Audio-SndFile
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
if (-e "/dev/null") {
# assume unix type redirection (not needed but makes the output a lot cleaner)
$redir = " >/dev/null 2>&1";
}
my @not_found;
open F,">","constants.xs" or die "Can't write constants.xs: $!";
print F $boiler;
for (@Audio::SndFile::Constants::EXPORT_OK) {
print "$_ ...";
open C,">test.c" or die "Can't write test.c: $!";
Makefile.PL view on Meta::CPAN
RETVAL
);
}
else {
print "not found\n";
push @not_found,$_;
}
}
close F;
print "\n";
if (@not_found) {
print "You are missing @not_found.\n";
if (grep { !/^SF_FORMAT_/ } @not_found) {
print "You are missing some expected constants.
If building this module fails, you might want to upgrade to a more
recent version of libsndfile
";
}
Makefile.PL view on Meta::CPAN
}
else {
print "Good. You've got all formats I know about\n";
}
my %nf = map { $_ => 1 } @not_found;
my (@define,@fnotfound);
print "Testing functions...\n";
my %test_functions = (
sf_write_sync => "sf_write_sync(&sndfile);"
Audio-TagLib
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
Audio-XMMSClient-XMLRPC
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]/,
);
}
Audio-XMMSClient
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
oopsAV|||
oopsCV|||
# 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
Audio-aKodePlayer
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]/,
);
}
Auth-ActiveDirectory
view release on metacpan or search on metacpan
xt/boilerplate.t view on Meta::CPAN
use warnings;
use Test::More;
plan tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
xt/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/Auth/ActiveDirectory.pm');
AuthCAS
view release on metacpan or search on metacpan
use AuthCAS;
{
my $cas = new AuthCAS(
casUrl => 'https://not_there/',
CAFile => '/usr/local/apache/conf/ssl.crt/ca-bundle.crt_notTHERE',
);
my $return_url = 'http://myapp/something';
( run in 1.023 second using v1.01-cache-2.11-cpan-cc502c75498 )