view release on metacpan or search on metacpan
libcares/CHANGES.0 view on Meta::CPAN
Version 1.7.4 (December 9, 2010)
Changed:
o local-bind: Support binding to local interface/IPs, see
ares_set_local_ip4, ares_set_local_ip6, ares_set_local_dev
Fixed:
o memory leak in ares_getnameinfo
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Alien/cargo.pm view on Meta::CPAN
=head1 SYNOPSIS
use Alien::cargo;
use Env qw( @PATH );
unshift @PATH, Alien::cargo->bind_dir;
=head1 DESCRIPTION
This L<Alien> provides the Rust L<Cargo|https://doc.rust-lang.org/cargo/> command.
view all matches for this distribution
view release on metacpan or search on metacpan
return;
};
build [
"%{configure} --enable-shared --disable-static --bindir=$ffi_target --libdir=$ffi_target @acflags",
$patch_makefile,
'%{make}',
'%{make} install',
sub {
my $build = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
patch/flex-2.6.4.diff view on Meta::CPAN
+
# Create the ChangeLog, but only if we're inside a git working directory
ChangeLog: $(srcdir)/tools/git2cl
@@ -63,4 +86,5 @@ install-exec-hook:
cd $(DESTDIR)$(bindir) && \
$(LN_S) -f flex$(EXEEXT) flex++$(EXEEXT)
-.PHONY: ChangeLog indent
+.PHONY: libfl install-libfl uninstall-libfl clean-libfl \
+ ChangeLog indent
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -461,7 +464,7 @@ all: all-recursive
.SUFFIXES:
am--refresh: Makefile
patch/flex-2.6.4.diff view on Meta::CPAN
+
# Create the ChangeLog, but only if we're inside a git working directory
ChangeLog: $(srcdir)/tools/git2cl
@@ -968,7 +991,8 @@ install-exec-hook:
cd $(DESTDIR)$(bindir) && \
$(LN_S) -f flex$(EXEEXT) flex++$(EXEEXT)
-.PHONY: ChangeLog indent
+.PHONY: libfl install-libfl uninstall-libfl clean-libfl \
+ ChangeLog indent
patch/flex-2.6.4.diff view on Meta::CPAN
- -runstatedir=* | --runstatedir=* | --runstatedi=* | --runstated=* \
- | --runstate=* | --runstat=* | --runsta=* | --runst=* | --runs=* \
- | --run=* | --ru=* | --r=*)
- runstatedir=$ac_optarg ;;
-
-sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb)
ac_prev=sbindir ;;
-sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \
@@ -1279,7 +1274,7 @@ fi
for ac_var in exec_prefix prefix bindir sbindir libexecdir datarootdir \
datadir sysconfdir sharedstatedir localstatedir includedir \
oldincludedir docdir infodir htmldir dvidir pdfdir psdir \
- libdir localedir mandir runstatedir
+ libdir localedir mandir
do
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -371,7 +373,7 @@ all: all-am
.SUFFIXES:
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -379,7 +381,7 @@ SUBDIRS = \
all: all-recursive
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -319,7 +321,7 @@ EXTRA_DIST = \
all: all-am
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -345,7 +347,7 @@ EXTRA_DIST = \
all: all-am
patch/flex-2.6.4.diff view on Meta::CPAN
mkinstalldirs = $(install_sh) -d
CONFIG_HEADER = config.h
-CONFIG_CLEAN_FILES =
+CONFIG_CLEAN_FILES = libfl.pc
CONFIG_CLEAN_VPATH_FILES =
+am__installdirs = "$(DESTDIR)$(bindir)" "$(DESTDIR)$(libdir)" \
+ "$(DESTDIR)$(pkgconfigdir)" "$(DESTDIR)$(includedir)"
+PROGRAMS = $(bin_PROGRAMS) $(noinst_PROGRAMS)
am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`;
am__vpath_adj = case $$p in \
$(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \
@@ -142,8 +146,6 @@ am__uninstall_files_from_dir = { \
|| { echo " ( cd '$$dir' && rm -f" $$files ")"; \
$(am__cd) "$$dir" && rm -f $$files; }; \
}
-am__installdirs = "$(DESTDIR)$(libdir)" "$(DESTDIR)$(bindir)" \
- "$(DESTDIR)$(includedir)"
LTLIBRARIES = $(lib_LTLIBRARIES)
libfl_la_LIBADD =
am_libfl_la_OBJECTS = libmain.lo libyywrap.lo
@@ -156,8 +158,8 @@ libfl_la_LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -446,6 +482,7 @@ AM_YFLAGS = -d
AM_CPPFLAGS = -DLOCALEDIR=\"$(localedir)\"
m4 = @M4@
patch/flex-2.6.4.diff view on Meta::CPAN
- $(AM_V_CCLD)$(libfl_la_LINK) $(am_libfl_la_rpath) $(libfl_la_OBJECTS) $(libfl_la_LIBADD) $(LIBS)
+libfl.pc: $(top_builddir)/config.status $(srcdir)/libfl.pc.in
+ cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@
install-binPROGRAMS: $(bin_PROGRAMS)
@$(NORMAL_INSTALL)
@list='$(bin_PROGRAMS)'; test -n "$(bindir)" || list=; \
@@ -703,6 +704,50 @@ clean-noinstPROGRAMS:
list=`for p in $$list; do echo "$$p"; done | sed 's/$(EXEEXT)$$//'`; \
echo " rm -f" $$list; \
rm -f $$list
+
patch/flex-2.6.4.diff view on Meta::CPAN
+all-am: Makefile $(PROGRAMS) $(LTLIBRARIES) $(DATA) $(HEADERS) \
+ config.h
install-binPROGRAMS: install-libLTLIBRARIES
installdirs:
- for dir in "$(DESTDIR)$(libdir)" "$(DESTDIR)$(bindir)" "$(DESTDIR)$(includedir)"; do \
+ for dir in "$(DESTDIR)$(bindir)" "$(DESTDIR)$(libdir)" "$(DESTDIR)$(pkgconfigdir)" "$(DESTDIR)$(includedir)"; do \
test -z "$$dir" || $(MKDIR_P) "$$dir"; \
done
install: install-am
@@ -1568,7 +1641,9 @@ install-strip:
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -1640,135 +1687,135 @@ dist_check_SCRIPTS = \
pthread_pthread_LDADD = @LIBPTHREAD@
patch/flex-2.6.4.diff view on Meta::CPAN
+pkgconfigdir = @pkgconfigdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
-runstatedir = @runstatedir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
@@ -292,7 +294,7 @@ EXTRA_DIST = \
all: all-am
view all matches for this distribution
view release on metacpan or search on metacpan
in downstream compilations.
1.38 2024-10-15
- Share builds:
- Use the internal libgeotiff
- Disable Java bindings for faster builds
- Disable use of system libspatialite if Alien::proj is a share build.
This sidesteps seg faults due to use of two libproj instances.
- Tweaks to the build system.
1.37 2024-05-28
view all matches for this distribution
view release on metacpan or search on metacpan
"Derivative Works" shall mean any work, whether in Source or Object
form, that is based on (or derived from) the Work and for which the
editorial revisions, annotations, elaborations, or other modifications
represent, as a whole, an original work of authorship. For the purposes
of this License, Derivative Works shall not include works that remain
separable from, or merely link (or bind by name) to the interfaces of,
the Work and Derivative Works thereof.
"Contribution" shall mean any work of authorship, including
the original version of the Work and any modifications or additions
to that Work or Derivative Works thereof, that is intentionally
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Alien/libnewrelic.pm view on Meta::CPAN
=over 4
=item L<NewFangle>
Perl level bindings for this SDK.
=item L<NewRelic::Agent::FFI>
This works with the older (no longer supported) NewRelic Agent SDK
view all matches for this distribution
view release on metacpan or search on metacpan
src/panda/function_utils.h view on Meta::CPAN
struct method : public Ifunction<Ret, Args...>{
using Method = Ret (Class::*)(Args...);
using ifunction = Ifunction<Ret, Args...>;
method(Method method, iptr<Class> thiz = nullptr) : thiz(thiz), meth(method) {}
iptr<method> bind(iptr<Class> thiz) {
this->thiz = thiz;
return iptr<method>(this);
}
Ret operator()(Args... args) override {
view all matches for this distribution
view release on metacpan or search on metacpan
libsecp256k1/src/wycheproof/WYCHEPROOF_COPYING view on Meta::CPAN
"Derivative Works" shall mean any work, whether in Source or Object
form, that is based on (or derived from) the Work and for which the
editorial revisions, annotations, elaborations, or other modifications
represent, as a whole, an original work of authorship. For the purposes
of this License, Derivative Works shall not include works that remain
separable from, or merely link (or bind by name) to the interfaces of,
the Work and Derivative Works thereof.
"Contribution" shall mean any work of authorship, including
the original version of the Work and any modifications or additions
to that Work or Derivative Works thereof, that is intentionally
view all matches for this distribution
view release on metacpan or search on metacpan
1. First checks if a system libssh is available via `pkg-config libssh`
2. If not, builds libssh from source (bundled tarball â no network required)
## Used By
- `Net::LibSSH` (XS binding) â links against libssh at build time
## Bundled Source
The distribution ships `libssh-0.10.6.tar.xz` in `share/`. No network access
required during `cpanm` install â suitable for air-gapped environments.
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Alien/make/Module/Build.pm view on Meta::CPAN
$self->apply_extra_pkgconfig_paths;
my $blib = File::Spec->catdir( $self->base_dir, "blib" );
my $bindir = File::Spec->catdir( $blib, "script" );
my $libdir = File::Spec->catdir( $blib, "arch" );
my $incdir = File::Spec->catdir( $libdir, "include" );
my $mandir = File::Spec->catdir( $blib, "libdoc" );
# All these at least must exist
inc/Alien/make/Module/Build.pm view on Meta::CPAN
$self->make_in_srcdir( (),
"LIBDIR=$instlibdir",
);
$self->make_in_srcdir( "install",
"BINDIR=$bindir",
"LIBDIR=$libdir",
"INCDIR=$incdir",
"MAN3DIR=$mandir",
"MAN7DIR=$mandir",
);
view all matches for this distribution
view release on metacpan or search on metacpan
? build_from_source($build, $executable)
: Path::Tiny::path( $build->install_prop->{extract} )
->child($executable);
# premake5 makefiles do not define an install target
my $bindir = Path::Tiny::path( $build->install_prop->{prefix}, 'bin' );
$bindir->mkpath;
my $target = $bindir->child($executable);
$binary->copy($target);
$target->chmod(0755);
$build->runtime_prop->{command} = $target->basename;
view all matches for this distribution
view release on metacpan or search on metacpan
- New revision of uPB (support for well-known types)
0.17 2021-03-13 09:47:58 CET
- Stop building googlepb binding
- Renamed to Alien::uPB::Core
0.15 2021-01-25 01:00:25 CET
- IO::Socket::SSL is required for HTTPS download (thanks to Slaven ReziÄ)
view all matches for this distribution
view release on metacpan or search on metacpan
inc/AU/Build.pm view on Meta::CPAN
my %cxx_flags = ExtUtils::CppGuess->new->module_build_options;
my ($version, $flags) = _check_flags(
$builder, \%cxx_flags,
compiler_flags => '-I. ' . Alien::ProtoBuf->cflags,
linker_flags => '-Llib -lupb.bindings.googlepb -lupb ' . Alien::ProtoBuf->libs,
);
die "It seems something went wrong while building uPB"
unless $version;
inc/AU/Build.pm view on Meta::CPAN
# -DNDEBUG works around https://github.com/google/upb/issues/63
$config->{keywords}{Cflags} = '-I${pcfiledir}/include -DNDEBUG';
$config->{keywords}{Libs} =
'-L${pcfiledir}/lib ' .
join " ", map "-l$_", qw(
upb.bindings.googlepb upb.pb upb.json upb.descriptor upb
);
return $config;
}
view all matches for this distribution
view release on metacpan or search on metacpan
libuv/test/test-multiple-listen.c
libuv/test/test-mutexes.c
libuv/test/test-osx-select.c
libuv/test/test-pass-always.c
libuv/test/test-ping-pong.c
libuv/test/test-pipe-bind-error.c
libuv/test/test-pipe-close-stdout-read-stdin.c
libuv/test/test-pipe-connect-error.c
libuv/test/test-pipe-connect-multiple.c
libuv/test/test-pipe-connect-prepare.c
libuv/test/test-pipe-getsockname.c
libuv/test/test-socket-buffer-size.c
libuv/test/test-spawn.c
libuv/test/test-stdio-over-pipes.c
libuv/test/test-strscpy.c
libuv/test/test-tcp-alloc-cb-fail.c
libuv/test/test-tcp-bind-error.c
libuv/test/test-tcp-bind6-error.c
libuv/test/test-tcp-close-accept.c
libuv/test/test-tcp-close-while-connecting.c
libuv/test/test-tcp-close.c
libuv/test/test-tcp-connect-error-after-write.c
libuv/test/test-tcp-connect-error.c
libuv/test/test-timer.c
libuv/test/test-tmpdir.c
libuv/test/test-tty-duplicate-key.c
libuv/test/test-tty.c
libuv/test/test-udp-alloc-cb-fail.c
libuv/test/test-udp-bind.c
libuv/test/test-udp-connect.c
libuv/test/test-udp-create-socket-early.c
libuv/test/test-udp-dgram-too-big.c
libuv/test/test-udp-ipv6.c
libuv/test/test-udp-multicast-interface.c
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Alien/wasmtime.pm view on Meta::CPAN
B<NOTE>: If you want to call WebAssembly from Perl you want to use
L<Wasm> or L<Wasm::Wasmtime> instead.
This L<Alien> provides C<wasmtime> a library runtime for Wasm
(WebAssembly). It's intended to be used by FFI (not XS) to build
Wasm bindings for Perl.
=head1 METHODS
=head2 dynamic_libs
view all matches for this distribution
view release on metacpan or search on metacpan
( Thanks to Bjoern Hoehrmann )
- Fix for Xcode 4.3 on OSX Lion
- Allow build 2.9.3 wxWidgets (default for 64 bit Mac)
0.54 Wed Nov 09 08:00:00 BST 2011
- Remove force of static binding for mingw libgcc & libstdc++
- For mingw, properly detect the gcc shared lib dependencies
to install
0.53 Thu Oct 13 08:00:00 BST 2011
- SDK fix for 2.8.x on Mac OSX Lion
- 2.9.2 default for 64bit MacOSX
view all matches for this distribution
view release on metacpan or search on metacpan
av_store|||
av_undef|||
av_unshift|||
ax|||n
bad_type|||
bind_match|||
block_end|||
block_gimme||5.004000|
block_start|||
boolSV|5.004000||p
boot_core_PerlIO|||
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AlignDB/SQL.pm view on Meta::CPAN
has 'select_map' => ( is => 'rw', isa => 'HashRef', default => sub { {} } );
has 'select_map_reverse' => ( is => 'rw', isa => 'HashRef', default => sub { {} } );
has 'from' => ( is => 'rw', isa => 'ArrayRef', default => sub { [] } );
has 'joins' => ( is => 'rw', isa => 'ArrayRef', default => sub { [] } );
has 'where' => ( is => 'rw', isa => 'ArrayRef', default => sub { [] } );
has 'bind' => ( is => 'rw', isa => 'ArrayRef', default => sub { [] } );
has 'limit' => ( is => 'rw', isa => 'Int' );
has 'offset' => ( is => 'rw', );
has 'group' => ( is => 'rw', );
has 'order' => ( is => 'rw', );
has 'having' => ( is => 'rw', isa => 'ArrayRef', default => sub { [] } );
lib/AlignDB/SQL.pm view on Meta::CPAN
my $self = shift;
## xxx Need to support old range and transform behaviors.
my ( $col, $val ) = @_;
#croak("Invalid/unsafe column name $col") unless $col =~ /^[\w\.]+$/;
my ( $term, $bind ) = $self->_mk_term( $col, $val );
push @{ $self->{where} }, "($term)";
push @{ $self->{bind} }, @$bind;
$self->where_values->{$col} = $val;
}
sub has_where {
my $self = shift;
lib/AlignDB/SQL.pm view on Meta::CPAN
if ( my $orig = $self->select_map_reverse->{$col} ) {
$col = $orig;
}
my ( $term, $bind ) = $self->_mk_term( $col, $val );
push @{ $self->{having} }, "($term)";
push @{ $self->{bind} }, @$bind;
}
#@returns AlignDB::SQL
sub copy {
my $self = shift;
lib/AlignDB/SQL.pm view on Meta::CPAN
sub _mk_term {
my $self = shift;
my ( $col, $val ) = @_;
my $term = '';
my @bind;
if ( ref($val) eq 'ARRAY' ) {
if ( ref $val->[0] or $val->[0] eq '-and' ) {
my $logic = 'OR';
my @values = @$val;
if ( $val->[0] eq '-and' ) {
lib/AlignDB/SQL.pm view on Meta::CPAN
shift @values;
}
my @terms;
for my $v (@values) {
my ( $term, $bind ) = $self->_mk_term( $col, $v );
push @terms, "($term)";
push @bind, @$bind;
}
$term = join " $logic ", @terms;
}
else {
$term = "$col IN (" . join( ',', ('?') x scalar @$val ) . ')';
@bind = @$val;
}
}
elsif ( ref($val) eq 'HASH' ) {
my $c = $val->{column} || $col;
$term = "$c $val->{op} ?";
push @bind, $val->{value};
}
elsif ( ref($val) eq 'SCALAR' ) {
$term = "$col $$val";
}
else {
$term = "$col = ?";
push @bind, $val;
}
return ( $term, \@bind );
}
1;
__END__
lib/AlignDB/SQL.pm view on Meta::CPAN
$sql->add_where('bucket_id', { op => '!=', value => 47 });
$sql->add_where('note_id', \'IS NULL');
$sql->limit(1);
my $sth = $dbh->prepare($sql->as_sql);
$sth->execute(@{ $sql->{bind} });
my @values = $sth->selectrow_array();
my $obj = SomeObject->new();
$obj->set_columns(...);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
sub sql2names {
my $self = shift;
my $sql = shift;
my $opt = shift;
# bind value
my $bind_value = $opt->{bind_value};
if ( !defined $bind_value ) {
$bind_value = [];
}
#@type DBI
my $dbh = $self->{dbh};
#@type DBI
my $sth = $dbh->prepare($sql);
$sth->execute( @{$bind_value} );
my @names = @{ $sth->{'NAME'} };
return @names;
}
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
my $query_name = $opt->{query_name};
if ( defined $query_name ) {
$sheet->write( $self->{row}, $self->{column} - 1, $query_name, $format->{NAME} );
}
# bind value
my $bind_value = $opt->{bind_value};
if ( !defined $bind_value ) {
$bind_value = [];
}
# init DBI query
my $sql_query = $opt->{sql_query};
#@type DBI
my $dbh = $self->{dbh};
#@type DBI
my $sth = $dbh->prepare($sql_query);
$sth->execute( @{$bind_value} );
# init $data
my $data;
if ( exists $opt->{data} ) {
if ( defined $opt->{data} and ref( $opt->{data} ) eq 'ARRAY' ) {
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
# init parameters
my $sql_query = $opt->{sql_query};
my $threshold = $opt->{threshold};
my $standalone = $opt->{standalone};
# bind value
my $bind_value = $opt->{bind_value};
unless ( defined $bind_value ) {
$bind_value = [];
}
# merge_last
my $merge_last = $opt->{merge_last};
unless ( defined $merge_last ) {
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
#@type DBI
my $dbh = $self->{dbh};
#@type DBI
my $sth = $dbh->prepare($sql_query);
$sth->execute(@$bind_value);
my @row_count = ();
while ( my @row = $sth->fetchrow_array ) {
push @row_count, \@row;
}
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
# init parameters
my $sql_query = $opt->{sql_query};
my $piece = $opt->{piece};
# bind value
my $bind_value = $opt->{bind_value};
unless ( defined $bind_value ) {
$bind_value = [];
}
# init DBI query
#@type DBI
my $sth = $dbh->prepare($sql_query);
$sth->execute(@$bind_value);
my @row_count = ();
while ( my @row = $sth->fetchrow_array ) {
push @row_count, \@row;
}
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
}
sub excute_sql {
my ( $self, $opt ) = @_;
# bind value
my $bind_value = $opt->{bind_value};
unless ( defined $bind_value ) {
$bind_value = [];
}
# init DBI query
my $sql_query = $opt->{sql_query};
#@type DBI
my $dbh = $self->{dbh};
#@type DBI
my $sth = $dbh->prepare($sql_query);
$sth->execute( @{$bind_value} );
}
sub check_column {
my ( $self, $table, $column ) = @_;
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
my ( $self, $opt, $part_number ) = @_;
#@type DBI
my $dbh = $self->{dbh};
# bind value
my $bind_value = $opt->{bind_value};
unless ( defined $bind_value ) {
$bind_value = [];
}
# init DBI query
my $sql_query = $opt->{sql_query};
#@type DBI
my $sth = $dbh->prepare($sql_query);
$sth->execute(@$bind_value);
my @data;
while ( my @row = $sth->fetchrow_array ) {
push @data, $row[0];
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
}
#==============================================================================
# Run time version of import (public method)
#==============================================================================
sub bind {
local ($/, $") = ("\n", ' '); local ($\, $,);
my ($code, @config);
my $o;
my ($pkg, $script) = caller;
my $class = shift;
croak M03_usage_bind() unless $class eq 'Inline';
$CONFIG{$pkg}{template} ||= $default_config;
my $language_id = shift or croak M03_usage_bind();
croak M03_usage_bind()
unless ($language_id =~ /^\S+$/ and $language_id !~ /\n/);
$code = shift or croak M03_usage_bind();
@config = @_;
my $next = 0;
for (@config) {
next if $next++ % 2;
croak M03_usage_bind() if /[\s\n]/;
}
$o = bless {}, $class;
$o->{INLINE}{version} = $VERSION;
$o->{API}{pkg} = $pkg;
$o->{API}{script} = $script;
inc/Inline.pm view on Meta::CPAN
END
return $usage;
}
sub M03_usage_bind {
my $usage = <<END;
Invalid usage of the Inline->bind() function. Valid usages are:
Inline->bind(language => "source-string", config-pair-list);
Inline->bind(language => "source-file", config-pair-list);
Inline->bind(language => [source-line-list], config-pair-list);
END
$usage .= <<END if defined $Inline::languages;
Supported languages:
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
}
#==============================================================================
# Run time version of import (public method)
#==============================================================================
sub bind {
local ($/, $") = ("\n", ' '); local ($\, $,);
my ($code, @config);
my $o;
my ($pkg, $script) = caller;
my $class = shift;
croak M03_usage_bind() unless $class eq 'Inline';
$CONFIG{$pkg}{template} ||= $default_config;
my $language_id = shift or croak M03_usage_bind();
croak M03_usage_bind()
unless ($language_id =~ /^\S+$/ and $language_id !~ /\n/);
$code = shift or croak M03_usage_bind();
@config = @_;
my $next = 0;
for (@config) {
next if $next++ % 2;
croak M03_usage_bind() if /[\s\n]/;
}
$o = bless {}, $class;
$o->{INLINE}{version} = $VERSION;
$o->{API}{pkg} = $pkg;
$o->{API}{script} = $script;
inc/Inline.pm view on Meta::CPAN
END
return $usage;
}
sub M03_usage_bind {
my $usage = <<END;
Invalid usage of the Inline->bind() function. Valid usages are:
Inline->bind(language => "source-string", config-pair-list);
Inline->bind(language => "source-file", config-pair-list);
Inline->bind(language => [source-line-list], config-pair-list);
END
$usage .= <<END if defined $Inline::languages;
Supported languages:
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
}
#==============================================================================
# Run time version of import (public method)
#==============================================================================
sub bind {
local ($/, $") = ("\n", ' '); local ($\, $,);
my ($code, @config);
my $o;
my ($pkg, $script) = caller;
my $class = shift;
croak M03_usage_bind() unless $class eq 'Inline';
$CONFIG{$pkg}{template} ||= $default_config;
my $language_id = shift or croak M03_usage_bind();
croak M03_usage_bind()
unless ($language_id =~ /^\S+$/ and $language_id !~ /\n/);
$code = shift or croak M03_usage_bind();
@config = @_;
my $next = 0;
for (@config) {
next if $next++ % 2;
croak M03_usage_bind() if /[\s\n]/;
}
$o = bless {}, $class;
$o->{INLINE}{version} = $VERSION;
$o->{API}{pkg} = $pkg;
$o->{API}{script} = $script;
inc/Inline.pm view on Meta::CPAN
END
return $usage;
}
sub M03_usage_bind {
my $usage = <<END;
Invalid usage of the Inline->bind() function. Valid usages are:
Inline->bind(language => "source-string", config-pair-list);
Inline->bind(language => "source-file", config-pair-list);
Inline->bind(language => [source-line-list], config-pair-list);
END
$usage .= <<END if defined $Inline::languages;
Supported languages:
view all matches for this distribution
view release on metacpan or search on metacpan
makepatch.spec view on Meta::CPAN
perl Makefile.PL
make all
make test
%install
mkdir -p $RPM_BUILD_ROOT%{_bindir}
mkdir -p $RPM_BUILD_ROOT%{_mandir}/man1
install blib/script/makepatch $RPM_BUILD_ROOT%{_bindir}
install blib/script/applypatch $RPM_BUILD_ROOT%{_bindir}
install -m 0444 blib/man1/* $RPM_BUILD_ROOT%{_mandir}/man1
%files
%doc README CHANGES
%{_bindir}/*
%{_mandir}/man1/*
view all matches for this distribution
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
exit 1;
}
## obtain relevant configuration options from cwb-config
our $prefix = `'$config_util' --prefix`;
our $bindir = `'$config_util' --bindir`;
our $default_registry = `'$config_util' --default-registry`;
chomp($prefix, $bindir, $default_registry);
print "IMS Open Corpus Workbench v$version found in $prefix tree.\n";
die "Error: can't handle directory paths with apostrophe yet. Please install the CWB in a different directory.\n"
if "$prefix$bindir$default_registry" =~ /'/;
## write configuration information to CWB::Config module
my $config_file = "lib/CWB/Config.pm";
my $fh = new FileHandle "> $config_file"
or die "Can't create file '$config_file': $!";
print $fh <<"STOP" or die "Error writing file '$config_file': $!";
package CWB::Config;
our \$Prefix = '$prefix';
our \$BinDir = '$bindir';
our \$Registry = '$default_registry';
1;
STOP
$fh->close
view all matches for this distribution
view release on metacpan or search on metacpan
BHKf_bhk_post_end|5.013006||Viu
BHKf_bhk_pre_end|5.013006||Viu
BHKf_bhk_start|5.013006||Viu
BhkFLAGS|5.013003||xVi
BIN|5.003007|5.003007|Vn
bind|5.005000||Viu
bind_match|5.003007||Viu
BIN_EXP|5.004000|5.004000|Vn
BIT_BUCKET|5.003007||Viu
BIT_DIGITS|5.004000||Viu
BITMAP_BYTE|5.009005||Viu
BITMAP_TEST|5.009005||Viu
KEY_alarm|5.003007||Viu
KEY_and|5.003007||Viu
KEY_atan2|5.003007||Viu
KEY_AUTOLOAD|5.003007||Viu
KEY_BEGIN|5.003007||Viu
KEY_bind|5.003007||Viu
KEY_binmode|5.003007||Viu
KEY_bless|5.003007||Viu
KEY_break|5.027008||Viu
KEY_caller|5.003007||Viu
KEY_catch|5.033007||Viu
Perl_pow|5.006000|5.006000|n
Perl_pp_accept|5.013009||Viu
Perl_pp_aelemfast_lex|5.015000||Viu
Perl_pp_andassign|5.013009||Viu
Perl_pp_avalues|5.013009||Viu
Perl_pp_bind|5.013009||Viu
Perl_pp_bit_xor|5.013009||Viu
Perl_pp_chmod|5.013009||Viu
Perl_pp_chomp|5.013009||Viu
Perl_pp_connect|5.013009||Viu
Perl_pp_cos|5.013009||Viu
PERLSI_UNKNOWN|5.005000||Viu
PERLSI_WARNHOOK|5.005000||Viu
PERL_SNPRINTF_CHECK|5.021002||Viu
PerlSock_accept|5.005000||Viu
PerlSock_accept_cloexec|5.027008||Viu
PerlSock_bind|5.005000||Viu
PerlSock_closesocket|5.006000||Viu
PerlSock_connect|5.005000||Viu
PerlSock_endhostent|5.005000||Viu
PerlSock_endnetent|5.005000||Viu
PerlSock_endprotoent|5.005000||Viu
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
}
#==============================================================================
# Run time version of import (public method)
#==============================================================================
sub bind {
local ($/, $") = ("\n", ' '); local ($\, $,);
my ($code, @config);
my $o;
my ($pkg, $script) = caller;
my $class = shift;
croak M03_usage_bind() unless $class eq 'Inline';
$CONFIG{$pkg}{template} ||= $default_config;
my $language_id = shift or croak M03_usage_bind();
croak M03_usage_bind()
unless ($language_id =~ /^\S+$/ and $language_id !~ /\n/);
$code = shift or croak M03_usage_bind();
@config = @_;
my $next = 0;
for (@config) {
next if $next++ % 2;
croak M03_usage_bind() if /[\s\n]/;
}
$o = bless {}, $class;
$o->{INLINE}{version} = $VERSION;
$o->{API}{pkg} = $pkg;
$o->{API}{script} = $script;
inc/Inline.pm view on Meta::CPAN
END
return $usage;
}
sub M03_usage_bind {
my $usage = <<END;
Invalid usage of the Inline->bind() function. Valid usages are:
Inline->bind(language => "source-string", config-pair-list);
Inline->bind(language => "source-file", config-pair-list);
Inline->bind(language => [source-line-list], config-pair-list);
END
$usage .= <<END if defined $Inline::languages;
Supported languages:
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ExtUtils/PkgConfig.pm view on Meta::CPAN
The pkg-config program retrieves information about installed libraries,
usually for the purposes of compiling against and linking to them.
ExtUtils::PkgConfig is a very simplistic interface to this utility, intended
for use in the Makefile.PL of perl extensions which bind libraries that
pkg-config knows. It is really just boilerplate code that you would've
written yourself.
=head2 USAGE
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FFI/Raw.pm view on Meta::CPAN
use base qw( FFI::Platypus::Legacy::Raw );
use FFI::Raw::Callback;
use FFI::Raw::Ptr;
use FFI::Raw::MemPtr;
# ABSTRACT: Perl bindings to the portable FFI library (libffi)
our $VERSION = '0.32';
foreach my $function (qw( memptr callback void int uint short ushort long ulong int64 uint64 char uchar float double str ptr ))
{
no strict 'refs';
lib/FFI/Raw.pm view on Meta::CPAN
=encoding UTF-8
=head1 NAME
FFI::Raw - Perl bindings to the portable FFI library (libffi)
=head1 VERSION
version 0.04
view all matches for this distribution