view release on metacpan or search on metacpan
Amethyst/Brain/Infobot/Module/Purldoc.pm view on Meta::CPAN
# it looks more impressive when the subroutine is all pr0totyped,
# etc., and perhaps I can distract you, the noble reader, from
# noticing the other less impressive bits of this code by putting
# in overly complicated code. We pass the array because we're only
# using return values if the sub blows up. Lame? Yes. Stupid?
# Perhaps. Intentional? Sure! This is perl, it's supposed to
# be fun. ;)
sub purldoc_lookup ($\$\@) {
my $self = shift ;
view release on metacpan or search on metacpan
Bio::Phylo::Beagle - wrapper around the Beagle library
This is perl wrapper code that allows one to use Bio::Phylo's data handling
capabilities to interface with the Beagle library for likelihood calculations:
* Beagle - http://dx.doi.org/10.1093/sysbio/syr100
* Bio::Phylo - http://dx.doi.org/10.1186/1471-2105-12-63
view release on metacpan or search on metacpan
t/bug21952.t view on Meta::CPAN
# My environment :
#
# CGI::Session : Version 4.14
# uname -a : Linux perl.smartech.pf 2.6.16.4 #1 PREEMPT Mon Apr 17
# 15:12:40 TAHT 2006 i686 AMD Athlon(TM) XP 2800+ unknown GNU/Linux
# perl -v : This is perl, v5.8.7 built for i386-linux
#
# -----------------------------------------------------
# My code (summarized) :
#
# 1 my $opt_dsn = ...
view release on metacpan or search on metacpan
lib/CPANPLUS/Dist/Gentoo.pm view on Meta::CPAN
Bootstrap an ebuild for L<CPANPLUS::Dist::Gentoo> using itself.
First, make sure your system C<perl> is C<5.10> or greater, so that the L<CPANPLUS> toolchain is available.
$ perl -v
This is perl 5, version 12, subversion 2 (v5.12.2)...
C<perl> C<5.12> is the current stable Perl version in Gentoo.
If you still have C<perl> C<5.8.x>, you can upgrade it by running the following commands as root :
# emerge -tv ">=dev-lang/perl-5.10"
view release on metacpan or search on metacpan
lib/Class/AccessorMaker.pm view on Meta::CPAN
Please do not put those perl-reserved names in there like DESTROY,
import, AUTOLOAD, and so on. It will hurt you badly.
Q: "But why do you not filter those?"
A: "This is perl baby, you can do whatever you like..."
And besides, there is going to be someone out there who is actualy
going to put it to good use...
=head1 AUTHOR
view release on metacpan or search on metacpan
lib/Config/Settings.pm view on Meta::CPAN
say XML. It's well documented which is an important feature and
reading it, unlike XML, doesn't require a whole lot of brain power
for either a human or a machine. A problem with YAML is the
whitespace and tab sensitivity. Some will of course not call this a
problem. After all, python is constructed on the very same principle,
but this isn't python. This is perl. Chances are that if a python-ish
structure had been more appropriate for your brain, you would already
be using python and not reading the documentation for this module.
But more importantly, this sensitivity is also a problem for people
who are not familiar with the format. When I work on a Catalyst
view release on metacpan or search on metacpan
lib/Data/Rlist.pm view on Meta::CPAN
$ perl -e '*x = 42; print $::{42}, *x'
*main::42*main::42
$ perl -v
This is perl, v5.8.8 built for cygwin-thread-multi-64int
(with 8 registered patches, see perl -V for more detail)
Of course these behaviors are not reliable, and may disappear in future versions of F<perl>. In
German you say "Schmutzeffekt" (dirt effect) for certain mechanical effects that occur
non-intendedly, because machines and electrical circuits are not perfect, and so is software.
view release on metacpan or search on metacpan
lib/Enbld.pm view on Meta::CPAN
'perl 5.18.1' is installed.
$ perl -v
This is perl 5, version 18, subversion 1 (v5.18.1) built for ...
=head2 ADD ARGUMENTS
'arguments' method adds an additional arguments to 'configure' script.
lib/Enbld.pm view on Meta::CPAN
perl 5.18.1 with thread is builded.
$ perl -v
This is perl 5, version 18, subversion 1 (v5.18.1) built for darwin-thread-multi-2level
=head2 INSTALL SOFTWARE WHICH DEPENDS
When using Enbld at OS X, Enbld also solve the dependencies between softwares automatically.
view release on metacpan or search on metacpan
README.system view on Meta::CPAN
DEVELOPMENT SYSTEM:
Linux eryq 2.0.34 #1 Fri May 8 16:05:57 EDT 1998 i586 unknown
DEVELOPMENT PERL:
This is perl, version 5.005_56 built for i586-linux
DEVELOPMENT DATE:
Mon Aug 20 16:30:26 EDT 2001
view release on metacpan or search on metacpan
doc/manual/benchmark.html view on Meta::CPAN
<th>gcc</th>
<td>3.3.3</td>
</tr>
<tr>
<th>Perl</th>
<td>This is perl, v5.8.6 built for i686-linux (32 bit)</td>
</tr>
<tr>
<th>Memory</th>
<td>
<pre class="table">
view release on metacpan or search on metacpan
lib/Graph/Layout/Aesthetic/Force.pm view on Meta::CPAN
to load forces on demand.
=item X<private_data>$old_private_data = $force->_private_data
Every force object is associated with one scalar of private data (default
undef). This is perl data meant for the implementer of a force class, and
should normally not be manipulated by the user (see
L<user_data|"user_data"> for that).
This method returns that private data.
lib/Graph/Layout/Aesthetic/Force.pm view on Meta::CPAN
Sets new private data, returns the old value.
=item X<user_data>$old_user_data = $force->user_data
Every force object is associated with one scalar of user data (default
undef). This is perl data meant for the enduser of a force class,
and should normally not be manipulated inside the force class
(see L<private_data|"private_data"> for that).
This method returns that user data.
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
AUTHOR => q{Kenneth Olwing <knth@cpan.org>},
VERSION_FROM => 'lib/Grep/Query.pm',
ABSTRACT_FROM => 'lib/Grep/Query.pm',
LICENSE => 'artistic_2',
EXE_FILES => [ 'script/qgrep' ],
# initial dev was made using: ActiveState: This is perl 5, version 20, subversion 1 (v5.20.1) built for MSWin32-x86-multi-thread-64int
# we use named capture groups...
#
MIN_PERL_VERSION => 5.010,
$eumm_understands_meta_merge
? (
view release on metacpan or search on metacpan
lib/HTML/Perlinfo/General.pm view on Meta::CPAN
$html .= print_table_end();
$html .= print_box_start(0);
$html .= "This is perl, v$Config{version} built for $Config{archname}<br />Copyright (c) 1987-@{[ sprintf '%d', (localtime)[5]+1900]}, Larry Wall";
$html .= print_box_end();
return $html if $opt eq 'top';
$html .= print_hr();
view release on metacpan or search on metacpan
use Test::More tests => 4;
use IO::All;
my $perl_version < io("$^X -v|");
ok($perl_version =~ /Larry Wall/);
ok($perl_version =~ /This is perl/);
io("$^X -v|") > $perl_version;
ok($perl_version =~ /Larry Wall/);
ok($perl_version =~ /This is p(erl|onie)/);
view release on metacpan or search on metacpan
t/14_spawn.t view on Meta::CPAN
my ( $buf, $exitcode, $error) = @_;
return $buf;
}
};
ok( this-> wait =~ /This is perl/s, 'good spawn');
this lambda {
context "./nothere 2>&1";
spawn {
my ( $buf, $exitcode, $error) = @_;
view release on metacpan or search on metacpan
JSON::HPack - JSON Homogeneous Collections Compressor
This is perl implementation of https://github.com/WebReflection/JSONH
view release on metacpan or search on metacpan
Language-Lisp version 0.20
==========================
This is perl-to-lisp bridge connection module.
Based on excellent module by Stuart Sierra, hosted at
http://stuartsierra.com/software/perl-in-lisp/
Very much thanks, Stuart! I owe you a beer.
view release on metacpan or search on metacpan
t/03-basic.t view on Meta::CPAN
use utf8;
use constant TESTNUM => 45;
use Test::More qw( no_plan );
BEGIN {
diag("This is perl $] running under $^O");
diag('Test started @ ' . scalar localtime time );
$BENCH = time;
use_ok( 'Lingua::Any::Numbers',':std', 'language_handler' );
}
view release on metacpan or search on metacpan
Lufs version 0.16
=================
This is perlufs, a perl plug for lufs.
It allows you to write filesystem implementations in perl.
INSTALLATION
To install this module type the following:
view release on metacpan or search on metacpan
t/10-base.t view on Meta::CPAN
'NSGetExecutablePath() returns something of positive length';
my $v = `$path -v`;
ok defined($v), '`NSGetExecutablePath() -v` returns something';
like $v, qr/This is perl\b/, 'NSGetExecutablePath() points to a perl';
$v = `$path -le 'print "\$]"'`;
ok defined($v), q{`NSGetExecutablePath() -le 'print "$]"'` returns something};
1 while chomp $v;
is $v, "$]", 'NSGetExecutablePath() points to the same perl version';
view release on metacpan or search on metacpan
Significant improvements to the whole Mail::IMAPClient::BodyStructure module
were contributed by Pedro Melo Cunha. It's really much better now.
Bullet-proofing added to some private methods. (Private meaning they are undocumented
and not part of the module's API. This is perl not java.)
Fix applied to unset_flag to support user-defined flags (thanks to E.Priogov
for submitting the bug report and patch).
view release on metacpan or search on metacpan
lib/Module/Which/P5Path.pm view on Meta::CPAN
SAMPLES
Cygwin ---------------
$ perl -v
This is perl, v5.8.6 built for cygwin-thread-multi-64int
$ perl -e '$" = "\n"; print "@INC"'
/usr/lib/perl5/5.8/cygwin
/usr/lib/perl5/5.8
/usr/lib/perl5/site_perl/5.8/cygwin
lib/Module/Which/P5Path.pm view on Meta::CPAN
/usr/lib/perl5/vendor_perl/5.8
Linux ----------------
# perl -v
This is perl, version 5.005_03 built for i386-linux
# perl -e '$" = "\n"; print "@INC"'
/usr/lib/perl5/i386-linux
/usr/lib/perl5
/usr/lib/perl5/site_perl/i386-linux
/usr/lib/perl5/site_perl
HP-UX ----------------
r11:/u01/r11>/usr/local/bin/perl -v
This is perl, v5.8.3 built for PA-RISC2.0
r11:/u01/r11>/usr/local/bin/perl -e '$" = "\n"; print "@INC"'
/usr/local/lib/perl5/5.8.3/PA-RISC2.0 [installarchlib]
/usr/local/lib/perl5/5.8.3 [installprivlib]
/usr/local/lib/perl5/site_perl/5.8.3/PA-RISC2.0 [installsitearch]
lib/Module/Which/P5Path.pm view on Meta::CPAN
installvendorscript=''
===
>perl -v
This is perl, version 4.0
> perl -e '$" = "\n"; print "@INC"'
/usr/local/lib/perl
====
> perl -v
This is perl, version 5.003 with EMBED
r11:/u01/r11>/u01/app/oracle/product/8.0.6/ows/3.0/perl/bin/perl -e '$" = "\n"; print "@INC"'
/mnt/was302/SRC/exp/cartxs/src/perl/lib/PA-RISC/5.003
/mnt/was302/SRC/exp/cartxs/src/perl/lib
/mnt/was302/SRC/exp/cartxs/src/perl/lib/site_perl/PA-RISC
view release on metacpan or search on metacpan
inc/Perl/Tidy.pm view on Meta::CPAN
return $readable_options;
}
sub show_version {
print <<"EOM";
This is perltidy, v$VERSION
Copyright 2000-2010, Steve Hancock
Perltidy is free software and may be copied under the terms of the GNU
General Public License, which is included in the distribution files.
inc/Perl/Tidy.pm view on Meta::CPAN
}
sub usage {
print STDOUT <<EOF;
This is perltidy version $VERSION, a perl script indenter. Usage:
perltidy [ options ] file1 file2 file3 ...
(output goes to file1.tdy, file2.tdy, file3.tdy, ...)
perltidy [ options ] file1 -o outfile
perltidy [ options ] file1 -st >outfile
view release on metacpan or search on metacpan
perl API for eboks.dk
=====================
This is perl interface for http://eboks.dk/, Danish national email system.
Included a simple POP server for proxying e-boks for read-only mail access
and a simple downloader.
You shall need your CPR# and password. You can get the password from the
view release on metacpan or search on metacpan
perl API for mit.dk
===================
This is perl interface for mit.dk, Danish national email system
Included a simple POP server for proxying mitdk for read-only mail access
and a simple downloader.
Installation
view release on metacpan or search on metacpan
tlib/Test/Tech.pm view on Meta::CPAN
# Different Perls keep the have different internal formats for numbers. Some
# keep them as binary numbers, while others as strings. The ones that keep
# them as strings may be well spec. In any case they have been let loose in
# the wild so the test scripts that use Data::Dumper must deal with them.
#
# This is perl, v5.6.1 built for MSWin32-x86-multi-thread
# (with 1 registered patch, see perl -V for more detail)
#
# Copyright 1987-2001, Larry Wall
#
# Binary build 631 provided by ActiveState Tool Corp. http://www.ActiveState.com
view release on metacpan or search on metacpan
auto/lib/perl/conf view on Meta::CPAN
echo "checking for perl"
NGX_PERL_VER=`$NGX_PERL -v 2>&1 | grep '^This is perl' 2>&1 \
| sed -e 's/^This is perl, \(.*\)/\1/'`
if test -n "$NGX_PERL_VER"; then
echo " + perl version: $NGX_PERL_VER"
if [ "`$NGX_PERL -e 'use 5.006001; print "OK"'`" != "OK" ]; then
view release on metacpan or search on metacpan
lib/NoSQL/PL2SQL/Simple.pm view on Meta::CPAN
use base qw( NoSQL::PL2SQL::Simple ) ;
}
$instance = TQIS::Session->new ;
The data definition is itself an NVP set data object. This is perl, so it's
accessed as a hash reference.
## display the data definition
print join "\n", %$instance, '' ;
view release on metacpan or search on metacpan
lib/PITA/Guest/Driver/Local.pm view on Meta::CPAN
}
# Find the install perl version
my $local_bin = $self->local_bin;
my $lines = `$local_bin -v`;
unless ( $lines =~ /^This is perl[^\n]+v([\d\.]+)[^\n]+built for/m ) {
Carp::croak("Failed to locate Perl version");
}
$self->{local_version} = version->new("$1");
# Check the local version