view release on metacpan or search on metacpan
lib/Authen/ModAuthPubTkt.pm view on Meta::CPAN
use MIME::Base64;
use File::Temp qw/tempfile/;
use IPC::Run3;
# ABSTRACT: A Module to generate Mod-Auth-PubTkt compatible Cookies
=pod
=head1 NAME
Authen::ModAuthPubTkt - Generate Tickets (Signed HTTP Cookies) for mod_auth_pubtkt protected websites.
=head1 VERSION
version 0.1.1
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Authen/Simple/WebForm.pm view on Meta::CPAN
Be default, this is not turned on. If you do not set this, then as long as the
server returns a successful status code (see HTTP::Status::is_success), then
the user will be authenticated. Most form based login systems return a successful
status code even when the login fails, so you'll probably want to set this.
A notable exception is the use of something like L<Apache::AuthCookie>, which
will return a 403 Forbidden error code when authentication fails.
Off by default.
lib/Authen/Simple/WebForm.pm view on Meta::CPAN
# search the cookie jar
$ua->cookie_jar->scan($search);
unless ($found)
{
$self->log->debug("Failed to authenticate user '$full_username'. Reason: Initial Cookie $expect was not found.")
if $self->log;
return 0;
}
}
}
lib/Authen/Simple/WebForm.pm view on Meta::CPAN
# search the cookie jar
$ua->cookie_jar->scan($search);
unless ($found)
{
$self->log->debug("Failed to authenticate user '$full_username'. Reason: Login Cookie $expect was not found.")
if $self->log;
return 0;
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Authen/Ticket.pm view on Meta::CPAN
package Authen::Ticket;
use Apache ();
use Apache::Constants (qw/OK DECLINED FORBIDDEN/);
use Apache::URI ();
use CGI::Cookie ();
use vars (qw#$VERSION @ISA#);
$VERSION = '0.02';
@ISA = ( );
lib/Authen/Ticket.pm view on Meta::CPAN
$self->debug("Eval results: [$@]");
} else {
$cookiev = $sc;
}
$self->go_to_url(CGI::Cookie->new(-name => $$self{TicketName},
-value => $cookiev,
-domain => $$self{TicketDomain},
-path => '/'
));
return OK;
lib/Authen/Ticket.pm view on Meta::CPAN
$log->debug("Ticket `request_uri' being set to `" .
$uri->unparse . "'");
# read in content if it exists... even for a GET
$self->err_headers_out->add('Set-Cookie' =>
CGI::Cookie->new(-name => 'request_uri',
-value => $uri->unparse,
-domain => $self->{TicketDomain},
-path => '/'
)
);
view all matches for this distribution
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
Mojo::Cache undef
Mojo::Collection undef
Mojo::Content undef
Mojo::Content::MultiPart undef
Mojo::Content::Single undef
Mojo::Cookie undef
Mojo::Cookie::Request undef
Mojo::Cookie::Response undef
Mojo::DOM undef
Mojo::DOM::CSS undef
Mojo::DOM::HTML undef
Mojo::Date undef
Mojo::DynamicMethods undef
cpanfile.snapshot view on Meta::CPAN
Mojo::Transaction::HTTP undef
Mojo::Transaction::WebSocket undef
Mojo::URL undef
Mojo::Upload undef
Mojo::UserAgent undef
Mojo::UserAgent::CookieJar undef
Mojo::UserAgent::Proxy undef
Mojo::UserAgent::Server undef
Mojo::UserAgent::Transactor undef
Mojo::Util undef
Mojo::WebSocket undef
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AutoSession.pm view on Meta::CPAN
sub cookie_line {
my $this = shift ;
my $name = $this->name ;
my $id = $this->id ;
my $line = qq`Set-Cookie: AutoSession=$name:$id` ;
return( $line ) ;
}
############
# HASH_REF #
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AxKit/App/TABOO.pm view on Meta::CPAN
use strict;
use warnings;
use Session;
use Apache;
use Apache::Cookie;
use Apache::Request;
use AxKit;
sub session_config {
my $r = shift;
lib/AxKit/App/TABOO.pm view on Meta::CPAN
sub session {
my $r = shift;
my $req = Apache::Request->instance($r);
my $vid = $req->param('VID');
unless ($vid) { # Then look in the cookie
my $cookies = Apache::Cookie->fetch;
my $tmp = $cookies->{'VID'};
return undef unless defined($tmp);
$vid = $tmp->value;
return undef unless ($vid); # No session key
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/AxKit/Plugin/AddXSLParams/BasicSession.pm view on Meta::CPAN
package Apache::AxKit::Plugin::AddXSLParams::BasicSession;
# $Id: BasicSession.pm,v 1.5 2004/09/17 02:05:22 kjetil Exp $
use strict;
use Apache::Constants;
use Apache::Cookie;
use Apache::Request;
use Apache::URI;
use vars qw($VERSION);
$VERSION = '0.20';
view all matches for this distribution
view release on metacpan or search on metacpan
package AxKit::XSP::Cookie;
use strict;
use Apache::AxKit::Language::XSP;
use Apache::Cookie;
use vars qw/@ISA $NS $VERSION/;
@ISA = ('Apache::AxKit::Language::XSP');
$NS = 'http://axkit.org/NS/xsp/cookie/v1';
my ($e, $tag, %attribs) = @_;
#warn "Checking: $tag\n";
if ($tag eq 'create') {
$cookie_context = 'create';
my $code = '{ my $__cookie = Apache::Cookie->new($r);';
if ($attribs{name}) {
$code .= '$__cookie->name(q|' . $attribs{name} . '|);';
}
if ($attribs{value}) {
}
elsif ($tag eq 'fetch') {
$cookie_context = 'fetch';
$e->start_expr($tag);
my $code = 'my (%__cookies, $__cookie, $__cookie_name);' . "\n";
$code .= '%__cookies = Apache::Cookie->fetch;';
$code .= '$__cookie_name = ""';
if ($attribs{name}) {
$code .= '. q|' . $attribs{name} . '|;';
$code .= '$__cookie = $__cookies{$__cookie_name} || Apache::Cookie->new($r);';
}
return $code;
}
else {
die "Unknown cookie tag: $tag";
elsif ($tag eq 'name') {
if ($cookie_context eq 'create') {
return ');';
}
else {
return ';$__cookie = $__cookies{$__cookie_name} || Apache::Cookie->new($r);';
}
}
elsif ($tag eq 'value') {
if ($cookie_context eq 'create') {
__END__
=head1 NAME
AxKit::XSP::Cookie - An XSP library for setting and getting HTTP cookies.
=head1 SYNOPSIS
Add the taglib to AxKit (via httpd.conf or .htaccess):
AxAddXSPTaglib AxKit::XSP::Cookie
Add the cookie: namespace to your XSP C<<xsp:page>> tag:
<xsp:page
language="Perl"
Then, put the taglib to work:
Set a cookie:
<cookie:create name="newCookie" value="somevalue" />
Get the value for a previous cookie:
<cookie:fetch name="oldCookie" />
=head1 DESCRIPTION
The XSP cookie: tag library implements a simple way to set/get HTTP cookies.
Allowed only as the child of a C<<cookie:create>> element, this tag defines the 'path' field for the cookie.
=head2 C<<cookie:expires>>
Allowed only as the child of a C<<cookie:create>> element, this tag sets the cookie's expiry date. It accepts the same types
values that Apache::Cookie does.
=head2 C<<cookie:domain>>
Allowed only as the child of a C<<cookie:create>> element, this tag defines the 'domain' field for the cookie.
free software; you can redistribute it and/or modify it under the same
terms as Perl itself.
=head1 SEE ALSO
AxKit, Apache::Cookie, CGI::Cookie
=cut
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AxKit/XSP/Minisession.pm view on Meta::CPAN
}
package AxKit::XSP::Minisession::Backend;
use Apache::Log;
use Apache::Session::File;
use Apache::Cookie;
use strict;
use warnings;
sub get_session {
my $r = shift;
my $sid;
if (!($sid = $r->pnotes("SESSION_ID"))) {
# Has it come from a cookie?
my %jar = Apache::Cookie->new($r)->parse;
if (exists $jar{sessionid}) {
$sid = $jar{sessionid}->value();
$r->log->debug("Got the session id ($sid) from a cookie");
}
}
lib/AxKit/XSP/Minisession.pm view on Meta::CPAN
sub put_session {
my ($r, $sess_ref) = @_;
$r->log->debug("Returning session ".$sess_ref->{_session_id}." to the cookie
jar");
my $cookie = Apache::Cookie->new($r,
-name => "sessionid",
-value => $sess_ref->{_session_id},
-path => "/"
);
$cookie->bake();
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/AxKit/Plugins/Session.pm view on Meta::CPAN
my ($key, $value) = split( /\s*=>\s*/, $arg );
$flex_options{$key} = $value;
}
# Read in the cookie if this is an old session
my $cookie = $r->header_in('Cookie');
{
# eliminate logging of Apache::Session warn messages
local $^W = 0;
$cookie =~ s/SESSION_ID=(\w*)/$1/;
lib/Apache/AxKit/Plugins/Session.pm view on Meta::CPAN
# Might be a new session, so lets give them a cookie
if (!defined($cookie) || $no_cookie)
{
my $session_cookie = "SESSION_ID=$session{_session_id}";
$r->header_out("Set-Cookie" => $session_cookie);
$session{_creation_time} = time;
print STDERR "Set a new header for the session cookie: \"$session_cookie\"\n" if DEBUG;
}
# Update the "Last Accessed" timestamp key
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AxKit2/HTTPHeaders.pm view on Meta::CPAN
# cookie spec doesn't allow merged headers for set-cookie,
# so instead we do this hack so to_string below does the right
# thing without needing to be arrayref-aware or such. also
# this lets client code still modify/delete this data
# (but retrieving the value of "set-cookie" will be broken)
$self->{headers}{$last_header} .= "\r\nSet-Cookie: $2";
} else {
# normal merged header case (according to spec)
$self->{headers}{$last_header} .= ", $2";
}
} else {
lib/AxKit2/HTTPHeaders.pm view on Meta::CPAN
return $self->{uri};
}
*uri = \&request_uri;
# Parse the Cookie header.
sub parse_cookies {
my AxKit2::HTTPHeaders $self = shift;
my $raw_cookies = $self->header('Cookie') || '';
$self->{parsed_cookies} = {};
foreach (split(/;\s+/, $raw_cookies)) {
my ($key, $value) = split("=", $_, 2);
my (@values) = map { uri_decode($_) } split(/&/, $value);
$key = uri_decode($key);
lib/AxKit2/HTTPHeaders.pm view on Meta::CPAN
push @params, map { "$_=$params{$_}" } keys %params;
my $key = uri_encode($name);
my $cookie = "$key=" . join("&", map uri_encode($_), ref($value) ? @$value : $value);
$cookie = join('; ', $cookie, @params);
if (my $oldcookie = $self->header('Set-Cookie')) {
$cookie = "$oldcookie, $cookie";
}
$self->header('Set-Cookie', $cookie);
$self->header('Expires', http_date(0)) unless $self->header('Expires');
return;
}
die "Cannot extract cookies from the response"
if $self->{type} eq 'res';
view all matches for this distribution
view release on metacpan or search on metacpan
cpanfile.snapshot view on Meta::CPAN
provides:
Module::Build 0.4231
Module::Build::Base 0.4231
Module::Build::Compat 0.4231
Module::Build::Config 0.4231
Module::Build::Cookbook 0.4231
Module::Build::Dumper 0.4231
Module::Build::Notes 0.4231
Module::Build::PPMMaker 0.4231
Module::Build::Platform::Default 0.4231
Module::Build::Platform::MacOS 0.4231
view all matches for this distribution
view release on metacpan or search on metacpan
/* set return code: */
RETVAL = l_pTOCArray;
OUTPUT:
RETVAL
CLEANUP:
/* give up reference to AV (see CookBookA/Ex4 for details): */
SvREFCNT_dec(RETVAL);
########################################################################
# call: #
view all matches for this distribution
view release on metacpan or search on metacpan
lib/BZ/Client.pm view on Meta::CPAN
package BZ::Client;
$BZ::Client::VERSION = '4.4004';
use BZ::Client::XMLRPC;
use BZ::Client::Exception;
use HTTP::CookieJar;
sub new {
my $class = shift;
my $self = {@_};
bless( $self, ref($class) || $class );
lib/BZ/Client.pm view on Meta::CPAN
$params{login} = $user;
$params{password} = $password;
$self->log( 'debug', 'BZ::Client::login, going to log in with username and password' );
my $cookies = HTTP::CookieJar->new();
my $response = $self->_api_call( 'User.login', \%params, { cookies => $cookies } );
if ( not defined( $response->{'id'} )
or $response->{'id'} !~ m/^\d+$/s )
{
$self->error('Server did not return a valid user ID.');
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Beagle.pm view on Meta::CPAN
C<Beagle> was born for this, and more.
=head1 SEE ALSO
L<Beagle::Manual::Tutorial>, L<Beagle::Manual::Cookbook>
=head1 AUTHOR
sunnavy <sunnavy@gmail.com>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Beam/Emitter.pm view on Meta::CPAN
#pod
#pod =over 4
#pod
#pod =item L<Beam::Event>
#pod
#pod =item L<Beam::Emitter::Cookbook>
#pod
#pod This document contains some useful patterns for your event emitters and
#pod listeners.
#pod
#pod =item L<http://perladvent.org/2013/2013-12-16.html>
lib/Beam/Emitter.pm view on Meta::CPAN
=over 4
=item L<Beam::Event>
=item L<Beam::Emitter::Cookbook>
This document contains some useful patterns for your event emitters and
listeners.
=item L<http://perladvent.org/2013/2013-12-16.html>
view all matches for this distribution
view release on metacpan or search on metacpan
- No spec changes.
- Synchronie version with Bencher::Backend.
- [doc] Rename Cookbook to HowTo, add howto item: picking a runner.
1.052 2021-08-13 Released-By: PERLANCAR; Urgency: low
- No spec changes.
1.011 2016-09-09 Released-By: PERLANCAR
- [doc] Document per-scenario 'result' property (Bencher::Backend
1.023) and per-dataset 'result' property.
- [doc] Add Cookbook.pod.
1.010 2016-08-26 Released-By: PERLANCAR
- No functional changes.
view all matches for this distribution
view release on metacpan or search on metacpan
data/wiki0.html view on Meta::CPAN
<div style="float:right;margin-left:0.5em;" id="mp-otd-img">
<div class="thumbinner mp-thumb" style="background: transparent; border: none; padding: 0; max-width: 120px;">
<a href="/wiki/File:Emmeline_Freda_du_Faur,_by_George_Edward_Mannering_(1862-1947).jpg" title="Freda Du Faur"><img alt="Freda Du Faur" src="//upload.wikimedia.org/wikipedia/commons/thumb/c/c8/Emmeline_Freda_du_Faur%2C_by_George_Edward_Mannering_%2818...
</div>
<ul><li><a href="/wiki/1800" title="1800">1800</a> â <a href="/wiki/War_of_the_Second_Coalition" title="War of the Second Coalition">War of the Second Coalition</a>: French forces defeated Austrian and Bavarian troops at the <b><a href="/wiki/Battl...
<li><a href="/wiki/1910" title="1910">1910</a> â <b><a href="/wiki/Freda_Du_Faur" title="Freda Du Faur">Freda Du Faur</a></b> <i>(pictured)</i> became the first woman to climb <a href="/wiki/Aoraki_/_Mount_Cook" title="Aoraki / Mount Cook">Mount Co...
<li><a href="/wiki/1968" title="1968">1968</a> â <a href="/wiki/Elvis_Presley" title="Elvis Presley">Elvis Presley</a>'s first television special and first live performance in seven years, <i><b><a href="/wiki/Elvis_(1968_TV_program)" title="Elvis ...
<li><a href="/wiki/1976" title="1976">1976</a> â Jamaican <a href="/wiki/Reggae" title="Reggae">reggae</a> musician <b><a href="/wiki/Bob_Marley" title="Bob Marley">Bob Marley</a></b> survived <a href="/wiki/Attempted_assassination_of_Bob_Marley" t...
<li><a href="/wiki/1994" title="1994">1994</a> â <a href="/wiki/Sony_Interactive_Entertainment" title="Sony Interactive Entertainment">Sony</a> released the <b><a href="/wiki/PlayStation_(console)" title="PlayStation (console)">PlayStation</a></b>,...
<div class="hlist hlist-separated" style="margin-top: 0.5em;"><ul><li><b><a href="/wiki/Birinus" title="Birinus">Birinus</a></b> (<abbr title="died">d.</abbr> 649 or 650)</li><li><b><a href="/wiki/Louisa_Susannah_Cheves_McCord" title=...
<div style="margin-top: 0.5em;">
data/wiki0.html view on Meta::CPAN
<li id="footer-places-disclaimer"><a href="/wiki/Wikipedia:General_disclaimer" title="Wikipedia:General disclaimer">Disclaimers</a></li>
<li id="footer-places-contact"><a href="//en.wikipedia.org/wiki/Wikipedia:Contact_us">Contact Wikipedia</a></li>
<li id="footer-places-mobileview"><a href="//en.m.wikipedia.org/w/index.php?title=Main_Page&mobileaction=toggle_view_mobile" class="noprint stopMobileRedirectToggle">Mobile view</a></li>
<li id="footer-places-developers"><a href="https://www.mediawiki.org/wiki/Special:MyLanguage/How_to_contribute">Developers</a></li>
<li id="footer-places-statslink"><a href="https://stats.wikimedia.org/#/en.wikipedia.org">Statistics</a></li>
<li id="footer-places-cookiestatement"><a href="https://foundation.wikimedia.org/wiki/Cookie_statement">Cookie statement</a></li>
</ul>
<ul id="footer-icons" class="noprint">
<li id="footer-copyrightico"><a href="https://wikimediafoundation.org/"><img src="/static/images/footer/wikimedia-button.png" srcset="/static/images/footer/wikimedia-button-1.5x.png 1.5x, /static/images/footer/wikimedia-button-2x.png 2x" width="88" ...
<li id="footer-poweredbyico"><a href="https://www.mediawiki.org/"><img src="/static/images/footer/poweredby_mediawiki_88x31.png" alt="Powered by MediaWiki" srcset="/static/images/footer/poweredby_mediawiki_132x47.png 1.5x, /static/images/footer/powe...
view all matches for this distribution
view release on metacpan or search on metacpan
share/SpamAssassin/easy_ham/02295.d6c2920e31d10893221d58aa148719c1 view on Meta::CPAN
me. Luckily, it seems that such deserving others will be able to get seats by
camping in line with us.
So, I'll be arriving in D.C. on Tuesday, attending an
Eldred/Duke/EPIC/Bookmobile superparty, and then camping in line with Seth
Schoen[3], Lisa Rein, Jace Cooke but unfortunately not Cory Doctorow. If you'd
like to come with us, let me know.
I was hoping I'd be able to take notes and post them to my weblog for those who
couldn't make it, but as I read in today's Times, only lawyers and those with
official press credentials are allowed to take notes![4] I think this is
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Big5.pm view on Meta::CPAN
use 5.00503; # Galapagos Consensus 1998 for primetools
# use 5.008001; # Lancaster Consensus 2013 for toolchains
# 12.3. Delaying use Until Runtime
# in Chapter 12. Packages, Libraries, and Modules
# of ISBN 0-596-00313-7 Perl Cookbook, 2nd Edition.
# (and so on)
# Version numbers should be boring
# http://www.dagolden.com/index.php/369/version-numbers-should-be-boring/
# For the impatient, the disinterested or those who just want to follow
lib/Big5.pm view on Meta::CPAN
sub unimport {}
sub Big5::escape_script;
# 6.18. Matching Multiple-Byte Characters
# in Chapter 6. Pattern Matching
# of ISBN 978-1-56592-243-3 Perl Perl Cookbook.
# (and so on)
# regexp of character
my $qq_char = qr/(?> \\c[\x40-\x5F] | \\? (?:[\x81-\xFE][\x00-\xFF] | [\x00-\xFF]) )/oxms;
my $q_char = qr/(?> [\x81-\xFE][\x00-\xFF] | [\x00-\xFF] )/oxms;
lib/Big5.pm view on Meta::CPAN
my $fh = gensym();
Ebig5::_open_a($fh, "$filename.e") or die __FILE__, ": Can't write open file: $filename.e\n";
# 7.19. Flushing Output
# in Chapter 7. File Access
# of ISBN 0-596-00313-7 Perl Cookbook, 2nd Edition.
select((select($fh), $|=1)[0]);
if (0) {
}
lib/Big5.pm view on Meta::CPAN
Pages: 1130
Print ISBN: 978-0-596-00492-7 | ISBN 10: 0-596-00492-3
Ebook ISBN: 978-1-4493-9890-3 | ISBN 10: 1-4493-9890-1
http://shop.oreilly.com/product/9780596004927.do
Perl Cookbook
By Tom Christiansen, Nathan Torkington
August 1998
Pages: 800
ISBN 10: 1-56592-243-3 | ISBN 13: 978-1-56592-243-3
http://shop.oreilly.com/product/9781565922433.do
Perl Cookbook, Second Edition
By Tom Christiansen, Nathan Torkington
Second Edition August 2003
Pages: 964
ISBN 10: 0-596-00313-7 | ISBN 13: 9780596003135
http://shop.oreilly.com/product/9780596003135.do
lib/Big5.pm view on Meta::CPAN
Third Edition August 2006
Pages: 542
ISBN 10: 0-596-52812-4 | ISBN 13:9780596528126
http://shop.oreilly.com/product/9780596528126.do
Regular Expressions Cookbook
By Jan Goyvaerts, Steven Levithan
May 2009
Pages: 512
ISBN 10:0-596-52068-9 | ISBN 13: 978-0-596-52068-7
http://shop.oreilly.com/product/9780596520694.do
Regular Expressions Cookbook, 2nd Edition
By Jan Goyvaerts, Steven Levithan
Final Release Date: August 2012
Pages: 612
ISBN: 978-1-4493-1943-4 | ISBN 10:1-4493-1943-2
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Big5HKSCS.pm view on Meta::CPAN
use 5.00503; # Galapagos Consensus 1998 for primetools
# use 5.008001; # Lancaster Consensus 2013 for toolchains
# 12.3. Delaying use Until Runtime
# in Chapter 12. Packages, Libraries, and Modules
# of ISBN 0-596-00313-7 Perl Cookbook, 2nd Edition.
# (and so on)
# Version numbers should be boring
# http://www.dagolden.com/index.php/369/version-numbers-should-be-boring/
# For the impatient, the disinterested or those who just want to follow
lib/Big5HKSCS.pm view on Meta::CPAN
sub unimport {}
sub Big5HKSCS::escape_script;
# 6.18. Matching Multiple-Byte Characters
# in Chapter 6. Pattern Matching
# of ISBN 978-1-56592-243-3 Perl Perl Cookbook.
# (and so on)
# regexp of character
my $qq_char = qr/(?> \\c[\x40-\x5F] | \\? (?:[\x81-\xFE][\x00-\xFF] | [\x00-\xFF]) )/oxms;
my $q_char = qr/(?> [\x81-\xFE][\x00-\xFF] | [\x00-\xFF] )/oxms;
lib/Big5HKSCS.pm view on Meta::CPAN
my $fh = gensym();
Ebig5hkscs::_open_a($fh, "$filename.e") or die __FILE__, ": Can't write open file: $filename.e\n";
# 7.19. Flushing Output
# in Chapter 7. File Access
# of ISBN 0-596-00313-7 Perl Cookbook, 2nd Edition.
select((select($fh), $|=1)[0]);
if (0) {
}
lib/Big5HKSCS.pm view on Meta::CPAN
Pages: 1130
Print ISBN: 978-0-596-00492-7 | ISBN 10: 0-596-00492-3
Ebook ISBN: 978-1-4493-9890-3 | ISBN 10: 1-4493-9890-1
http://shop.oreilly.com/product/9780596004927.do
Perl Cookbook
By Tom Christiansen, Nathan Torkington
August 1998
Pages: 800
ISBN 10: 1-56592-243-3 | ISBN 13: 978-1-56592-243-3
http://shop.oreilly.com/product/9781565922433.do
Perl Cookbook, Second Edition
By Tom Christiansen, Nathan Torkington
Second Edition August 2003
Pages: 964
ISBN 10: 0-596-00313-7 | ISBN 13: 9780596003135
http://shop.oreilly.com/product/9780596003135.do
lib/Big5HKSCS.pm view on Meta::CPAN
Third Edition August 2006
Pages: 542
ISBN 10: 0-596-52812-4 | ISBN 13:9780596528126
http://shop.oreilly.com/product/9780596528126.do
Regular Expressions Cookbook
By Jan Goyvaerts, Steven Levithan
May 2009
Pages: 512
ISBN 10:0-596-52068-9 | ISBN 13: 978-0-596-52068-7
http://shop.oreilly.com/product/9780596520694.do
Regular Expressions Cookbook, 2nd Edition
By Jan Goyvaerts, Steven Levithan
Final Release Date: August 2012
Pages: 612
ISBN: 978-1-4493-1943-4 | ISBN 10:1-4493-1943-2
view all matches for this distribution
view release on metacpan or search on metacpan
lib/BigIP/iControl.pm view on Meta::CPAN
'{urn:iControl}LocalLB.AuthenticationMethod' => 1,
'{urn:iControl}LocalLB.AvailabilityStatus' => 1,
'{urn:iControl}LocalLB.ClientSSLCertificateMode' => 1,
'{urn:iControl}LocalLB.ClonePoolType' => 1,
'{urn:iControl}LocalLB.CompressionMethod' => 1,
'{urn:iControl}LocalLB.CookiePersistenceMethod' => 1,
'{urn:iControl}LocalLB.CredentialSource' => 1,
'{urn:iControl}LocalLB.EnabledStatus' => 1,
'{urn:iControl}LocalLB.HardwareAccelerationMode' => 1,
'{urn:iControl}LocalLB.HttpChunkMode' => 1,
'{urn:iControl}LocalLB.HttpCompressionMode' => 1,
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Bigtop/Keywords.pm view on Meta::CPAN
sort_order => 20,
},
plugins => {
keyword => 'plugins',
label => 'Plugins',
descr => 'List of Plugins i.e. AuthCookie Static',
type => 'text',
sort_order => 30,
},
},
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Bio/BPWrapper/TreeManipulations.pm view on Meta::CPAN
$node->add_tag_value($colnames[$index], $ref_node_state);
return $ref_node_state;
}
}
sub _intersect_or_union { # from Perl Cookbook
my ($ref1, $ref2) = @_;
my (%union, %isect);
foreach my $e (@$ref1, @$ref2) {
$union{$e}++ && $isect{$e}++; # Perl Cookbook ideom
}
# warn Dumper(\%union, \%isect);
if (@$ref1 == @$ref2) { # (0) U (0); (0) U (1); (1) U (1); (0,1) U (0,1)
return [keys %union];
view all matches for this distribution
view release on metacpan or search on metacpan
doc/slides/dbic_intro/Spork.slides view on Meta::CPAN
= The Real Advantages of DBIC
* it's all objects. you can delegate to them, pass them around, etc.
* HOWEVER:
+** usually you don't want to subclass them
** but, see |DBIx::Class::Manual::Cookbook|
----
== That's All
* The END
view all matches for this distribution
view release on metacpan or search on metacpan
t/data/sequencefamily.dat view on Meta::CPAN
RN [30]
RP X-RAY CRYSTALLOGRAPHY (3.0 ANGSTROMS).
RC SPECIES=Rat;
RX MEDLINE=85188323; PubMed=3990807;
RA Babu Y.S., Sack J.S., Greenhough T.J., Bugg C.E., Means A.R.,
RA Cook W.J.;
RT "Three-dimensional structure of calmodulin.";
RL Nature 315:37-40(1985).
RN [31]
RP X-RAY CRYSTALLOGRAPHY (2.2 ANGSTROMS).
RC SPECIES=Rat;
RX MEDLINE=89110997; PubMed=3145979;
RA Babu Y.S., Bugg C.E., Cook W.J.;
RT "Structure of calmodulin refined at 2.2-A resolution.";
RL J. Mol. Biol. 204:191-204(1988).
RN [32]
RP X-RAY CRYSTALLOGRAPHY (2 ANGSTROMS).
RC SPECIES=Bovine;
view all matches for this distribution
view release on metacpan or search on metacpan
t/21-proxy.t view on Meta::CPAN
my $listen_port = shift;
eval {
# Child process runs a server
# (similar to http://poe.perl.org/?POE_Cookbook/Web_Server)
POE::Component::Server::TCP->new(
Port => $listen_port,
ClientFilter => 'POE::Filter::HTTPD',
ClientInput => sub {
my ($kernel, $heap, $req_or_resp) = @_[KERNEL, HEAP, ARG0];
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Bio/Das/ProServer.pm view on Meta::CPAN
ProServer is a server implementation of the DAS protocol.
http://biodas.org/
ProServer is based on example preforking POEserver at
http://poe.perl.org/?POE_Cookbook/Web_Server_With_Forking
=head1 DIAGNOSTICS
To run in non-pre-forking, debug mode:
eg/proserver -debug -x
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Bio/DB/EUtilities.pm view on Meta::CPAN
=over 3
=item * Finish documentation
HOWTOs (both standard and Cookbook).
=item * Cookbook tests
Set up dev-only tests for Cookbook examples to make sure they are consistently
updated.
=item * API
Mark Jensen has written up the SOAP-based eUtil modules, maybe we should
lib/Bio/DB/EUtilities.pm view on Meta::CPAN
=head2 next_History
Title : next_History
Usage : while (my $hist=$parser->next_History) {...}
Function : returns next HistoryI (if present).
Returns : Bio::Tools::EUtilities::HistoryI (Cookie or LinkSet)
Args : none
Note : esearch, epost, and elink are all capable of returning data which
indicates search results (in the form of UIDs) is stored on the
remote server. Access to this data is wrapped up in simple interface
(HistoryI), which is implemented in two classes:
Bio::DB::EUtilities::History (the simplest) and
Bio::DB::EUtilities::LinkSet. In general, calls to epost and esearch
will only return a single HistoryI object (formerly known as a
Cookie), but calls to elink can generate many depending on the
number of IDs, the correspondence, etc. Hence this iterator, which
allows one to retrieve said data one piece at a time.
=head2 next_cookie (alias for next_History)
=head2 get_Histories
Title : get_Histories
Usage : my @hists = $parser->get_Histories
Function : returns list of HistoryI objects.
Returns : list of Bio::Tools::EUtilities::HistoryI (Cookie or LinkSet)
Args : none
=head1 Query-related methods
=head2 get_count
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Bio/Grep.pm view on Meta::CPAN
This is only a short overview of the functionality of this module.
You should also read L<Bio::Grep::Backend::BackendI> and the documentation of
the back-end you want to use (e.g. L<Bio::Grep::Backend::Vmatch>).
L<Bio::Grep::Cookbook> is a (not yet comprehensive) collection of recipes for
common problems.
=head2 GENERATE DATABASES
As a first step, you have to generate a C<Bio::Grep> database out of your Fasta
lib/Bio/Grep.pm view on Meta::CPAN
L<http://rt.cpan.org>.
=head1 SEE ALSO
L<Bio::Grep::Cookbook>
L<Bio::Grep::Backend::BackendI>
L<Bio::Grep::Backend::Vmatch>
L<Bio::Grep::Backend::GUUGle>
L<Bio::Grep::Backend::RE>
L<Bio::Grep::Backend::Agrep>
view all matches for this distribution