view release on metacpan or search on metacpan
t/10-Alien-InteractiveBrokers.t view on Meta::CPAN
# Alien::InteractiveBrokers - tests for main module
#
# Copyright (c) 2010-2012 Jason McManus
#
use Data::Dumper;
use File::Spec::Functions qw( catdir catfile );
use Test::More tests => 12;
use strict;
use warnings;
view release on metacpan or search on metacpan
t/02_stub.t view on Meta::CPAN
our $VERSION = 0.001_000;
use Test2::V0;
use Test::Alien;
use Alien::JPCRE2;
use Data::Dumper; # DEBUG
plan(1);
# load alien
alien_ok('Alien::JPCRE2', 'Alien::JPCRE2 loads successfully and conforms to Alien::Base specifications');
view release on metacpan or search on metacpan
patch/gen.pl view on Meta::CPAN
use strict;
use warnings;
use Data::Dumper qw( Dumper );
use Path::Tiny qw( path );
my $patch_filename = shift @ARGV;
die "need filename" unless defined $patch_filename;
view release on metacpan or search on metacpan
"test" : {
"recommends" : {
"CPAN::Meta" : "2.120900"
},
"requires" : {
"Data::Dumper" : "0",
"ExtUtils::MakeMaker" : "6.52",
"File::Spec" : "0",
"Test2::V0" : "0",
"Test::Alien" : "0",
"Test::Alien::Diag" : "0",
view release on metacpan or search on metacpan
t/01-config.t view on Meta::CPAN
use strict;
use warnings;
use Test::More;
use Data::Dumper;
BEGIN { use_ok( 'Alien::NSS::ConfigData' ); }
my $type = Alien::NSS::ConfigData->config('install_type');
if ( $type eq 'system' ) {
view release on metacpan or search on metacpan
}
},
"test" : {
"requires" : {
"Capture::Tiny" : "0",
"Data::Dumper" : "0",
"English" : "0",
"Env" : "0",
"File::Spec" : "0",
"IPC::Cmd" : "0",
"Test2::V0" : "0",
view release on metacpan or search on metacpan
t/04_binary_version_test2.t view on Meta::CPAN
use Test2::V0;
use Test::Alien;
use Alien::Pluto;
use English qw(-no_match_vars); # for $OSNAME
use Data::Dumper; # DEBUG
plan(8);
# load alien
alien_ok('Alien::Pluto', 'Alien::Pluto loads successfully and conforms to Alien::Base specifications');
view release on metacpan or search on metacpan
inc/inc_Module-Build/Module/Build/Compat.pm view on Meta::CPAN
use IO::File;
use Config;
use Module::Build;
use Module::Build::ModuleInfo;
use Module::Build::Version;
use Data::Dumper;
my %convert_installdirs = (
PERL => 'core',
SITE => 'site',
VENDOR => 'vendor',
view release on metacpan or search on metacpan
inc/Text/Patch.pm view on Meta::CPAN
push @hunks, { %hunk }; # push last hunk
shift @hunks; # first is always empty
for my $hunk ( reverse @hunks )
{
#use Data::Dumper;
#print STDERR Dumper( $hunk );
my @pdata;
for( @{ $hunk->{ DATA } } )
{
next unless s/^([ \-\+])//;
view release on metacpan or search on metacpan
t/04_binary_version_test2.t view on Meta::CPAN
use Test2::V0;
use Test::Alien;
use Alien::Texinfo;
use English qw(-no_match_vars); # for $OSNAME
use Data::Dumper; # DEBUG
plan(5);
# load alien
alien_ok('Alien::Texinfo', 'Alien::Texinfo loads successfully and conforms to Alien::Base specifications');
view release on metacpan or search on metacpan
use Test::More;
use blib;
use Data::Dumper;
use_ok 'Alien::UnicornEngine';
my $unicorn = new_ok('Alien::UnicornEngine');
note $unicorn->cflags;
note $unicorn->libs;
note Alien::UnicornEngine::ConfigData->config('finished_installing');
view release on metacpan or search on metacpan
inc/inc_Module-Build/Module/Build/Compat.pm view on Meta::CPAN
use IO::File;
use Config;
use Module::Build;
use Module::Build::ModuleInfo;
use Module::Build::Version;
use Data::Dumper;
my %convert_installdirs = (
PERL => 'core',
SITE => 'site',
VENDOR => 'vendor',
view release on metacpan or search on metacpan
EO_SNAPPY_VERSION
);
meta->after_hook( probe_system => sub {
my ($build) = @_;
use Data::Dumper;
print Dumper($build);
#$build->runtime_prop->{$flag} = '-Wl,-rpath,/usr/pkg/lib ' . $build->runtime_prop->{$flag};
});
after 'gather' => sub {
my ($build) = @_;
use Data::Dumper; CORE::say Dumper($build);
};
share {
# The tarball from the 1.1.8 release and the 1.1.8 tag produce different
# libraries -- and from some preliminary testing, the tarball version isn't
view release on metacpan or search on metacpan
t/00_diag.t view on Meta::CPAN
use Test2::V0 -no_srand => 1;
use Alien::pkgconf;
use Data::Dumper qw( Dumper );
diag '';
diag '';
diag '';
view release on metacpan or search on metacpan
inc/My/Build/Base.pm view on Meta::CPAN
use My::Build::Utility qw(awx_arch_file awx_touch);
use Alien::wxWidgets::Utility qw(awx_sort_config awx_grep_config);
use File::Path ();
use File::Basename ();
use Fatal qw(open close unlink);
use Data::Dumper;
use File::Glob qw(bsd_glob);
use Carp;
use lib '.';
# Ensure deterministic output
$Data::Dumper::Sortkeys = 1;
# use the system version of a module if present; in theory this could lead to
# compatibility problems (if the latest version of one of the dependencies,
# installed in @INC is incompatible with the bundled version of a module)
sub _load_bundled_modules {
view release on metacpan or search on metacpan
lib/App/AllKnowingDNS/Config.pm view on Meta::CPAN
package App::AllKnowingDNS::Config;
use Mouse;
use App::AllKnowingDNS::Zone;
use App::AllKnowingDNS::Util;
use Data::Dumper;
=head1 NAME
App::AllKnowingDNS::Config - configuration object
view release on metacpan or search on metacpan
inc/Inline/C.pm view on Meta::CPAN
package Inline::C;
our $VERSION = '0.67';
use Inline 0.56;
use Config;
use Data::Dumper;
use Carp;
use Cwd qw(cwd abs_path);
use File::Spec;
use Fcntl ':flock';
view release on metacpan or search on metacpan
lib/Crypt/RSA/Key/Private.pm view on Meta::CPAN
## it under the same terms as Perl itself.
use vars qw($AUTOLOAD $VERSION);
use base 'Crypt::RSA::Errorhandler';
use Tie::EncryptedHash;
use Data::Dumper;
use Math::BigInt try => 'GMP, Pari';
use Math::Prime::Util qw/is_prime/;
use Carp;
$Crypt::RSA::Key::Private::VERSION = '1.99';
view release on metacpan or search on metacpan
inc/Inline/C.pm view on Meta::CPAN
package Inline::C;
our $VERSION = '0.71';
use Inline 0.56;
use Config;
use Data::Dumper;
use Carp;
use Cwd qw(cwd abs_path);
use File::Spec;
use constant IS_WIN32 => $^O eq 'MSWin32';
use if !IS_WIN32, Fcntl => ':flock';
view release on metacpan or search on metacpan
BabelFish.pm view on Meta::CPAN
=head2 $phish->get_languages_hashref()
Returns a hashref of language info. It can be used to view all the available languages, their name, targets, and two letter code.
It is probably most usefull if you need to reference what the two letter code is for a given langauge.
use Data::Dumper;
print Dumper $phish->get_languages_hashref; # AltaVista::BabelFish->get_languages_hashref works also
=head2 $phish->fishinfo()
Returns content for an html page (no header) if called via a browser (IE !-t STDIN) and a text page if via CLI (IE -t STDIN)
view release on metacpan or search on metacpan
lib/Alter.pm view on Meta::CPAN
my $trans = $trans_tab{ $type};
$trans->( $_[ 0], $_[ 1]); # may change $_[ 1] ($to)
$_[ 1];
}
### Data::Dumper support (for viewing only)
{
package Alter::Dumper;
# return a viewable string containing the object information
sub Dumper {
my $obj = shift;
require Data::Dumper;
local $Data::Dumper::Purity = 1;
Data::Dumper::Dumper( $obj->Alter::image);
}
}
### Storable support
{