はてなブックマーク

NAME PPR - Pattern-based Perl Recognizer VERSION This document describes PPR version 0.001010 SYNOPSIS use PPR; # Define a regex that will match an entire Perl document... my $perl_document = qr{ # What to match # Install the (?&PerlDocument) rule (?&PerlEntireDocument) $PPR::GRAMMAR }x; # Define a regex that will match a single Perl block... my $perl_block = qr{ # What to match... # Install the (

Tools Download (135.65KB) MetaCPAN Explorer Permissions Subscribe to distribution Install Instructions Dependencies Class::Accessor Exception::Class Params::Validate Scalar::Util and possibly others Reverse dependencies CPAN Testers List Dependency graph Permalinks This version Latest version NAME SVG::Rasterize - rasterize SVG content to pixel graphics VERSION Version 0.003008 my $blockID = 0; my

NAME App::Prove::Plugin::MySQLPool - pool of Test::mysqld-s reused while testing SYNOPSIS prove -j4 -PMySQLPool t or prove -j4 -PMySQLPool=MyApp::Test::DB t DESCRIPTION App::Prove::Plugin::MySQLPool is a prove plugin to speedup your tests using a pool of Test::mysqlds. If you're using Test::mysqld, and have a lot of tests using it, annoyed by the mysql startup time slowing your tests, this module

NAME Acme::Test::VW - Makes your tests always pass under CI SYNOPSIS # export PERL5OPT=-MAcme::Test::VW use Test::More; ok 1 == 2; done_testing; DESCRIPTION Acme::Test::VW makes your failing tests pass when running under CI (CPAN Testers, Jenkins, Travis CI etc). Inspired by https://github.com/auchenberg/volkswagen AUTHOR Tatsuhiko Miyagawa <miyagawa@bulknews.net> COPYRIGHT Copyright 2015- Tatsuhi

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

Bakkiaraj Murugesan (bakkiaraj) Damyan Ivanov Diab Jerius (DJERIUS) Dylan Cali (calid) Eric Brine (IKEGAMI) Fitz Elliott (felliott) Gregor Herrmann (gregoa) Håkon Hægland (hakonhagland, HAKONH) Ilya Pavlov (Ilya33) José Joaquín Atria (JJATRIA) Lukas Mai (MAUKE) Meredith (merrilymeredith, MHOWARD) Mohammad S Anwar (MANWAR) Pete Houston (openstrike, HOUSTON) Petr Písař (ppisar) pipcet Shlomi Fish (s

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

NAME WWW::Mechanize::PhantomJS - automate the PhantomJS browser SYNOPSIS use WWW::Mechanize::PhantomJS; my $mech = WWW::Mechanize::PhantomJS->new(); $mech->get('http://google.com'); $mech->eval_in_page('alert("Hello PhantomJS")'); my $png= $mech->content_as_png(); WWW::Mechanize::PhantomJS->new %options my $mech = WWW::Mechanize::PhantomJS->new(); autodie Control whether HTTP errors are fatal. aut

NAME UnderscoreJS - Perl port of Underscore.js SYNOPSIS use UnderscoreJS; _([3, 2, 1])->sort; DESCRIPTION UnderscoreJS Perl is a clone of a popular JavaScript library http://github.com/documentcloud/underscore|Underscore.js. Why? Because Perl is awesome. And because we can! /\ \ __ __ ___ \_\ \ __ _ __ ____ ___ ___ _ __ __ /\ \/\ \ /' _ `\ /'_` \ /'__`\/\`'__\/',__\ /'___\ / __`\/\`'__\/'__`\ \ \

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

NAME Test::JsonAPI::Autodoc - Test JSON API response and auto generate API documents SYNOPSIS use HTTP::Request::Common; use Test::More; use Test::JsonAPI::Autodoc; # JSON request describe 'POST /foo' => sub { my $req = POST 'http://localhost:5000/foo'; $req->header('Content-Type' => 'application/json'); $req->content(q{ { "id": 1, "message": "blah blah" } }); my $res = http_ok($req, 200, "returns

NAME Test::Mock::Guard - Simple mock test library using RAII. SYNOPSIS use Test::More; use Test::Mock::Guard qw(mock_guard); package Some::Class; sub new { bless {} => shift } sub foo { "foo" } sub bar { 1; } package main; { my $guard = mock_guard( 'Some::Class', { foo => sub { "bar" }, bar => 10 } ); my $obj = Some::Class->new; is( $obj->foo, "bar" ); is( $obj->bar, 10 ); } my $obj = Some::Class-

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

NAME Plack::Middleware::DebugRequestParams - debug request parameters (inspired by Catalyst) SYNOPSIS $ plackup -e 'enable "DebugRequestParams"' app.psgi $ curl -F foo=bar -F baz=foobar http://localhost:5000/ .--------------------. | Parameter | Value | +-----------+--------+ | baz | foobar | | foo | bar | '-----------+--------' OPTIONS ignore_path use Plack::Builder; builder { enable "DebugReques

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

NAME Moo - Minimalist Object Orientation (with Moose compatibility) SYNOPSIS package Cat::Food; use Moo; use strictures 2; use namespace::clean; sub feed_lion { my $self = shift; my $amount = shift || 1; $self->pounds( $self->pounds - $amount ); } has taste => ( is => 'ro', ); has brand => ( is => 'ro', isa => sub { die "Only SWEET-TREATZ supported!" unless $_[0] eq 'SWEET-TREATZ' }, ); has pounds

Atsushi Kobayashi bayashi Fuji, Goro Gelu Lupas issm k-takahashi karupanerura Kaz-su Kazuho Oku ktat lestrrat makamaka Masahiro Chiba Masayuki Matsuki Neil Bowers plsplsme pokutuna sakamossan soh335 Tokuhiro Matsuno Toshio Ito yamaguchi.toru NAME SQL::Maker - Yet another SQL builder SYNOPSIS use SQL::Maker; my $builder = SQL::Maker->new( driver => 'SQLite', # or your favorite driver ); # SELECT ($

NAME L - Perl extension to load modules automatically in one-liners. VERSION This document describes L version v1.0.1. SYNOPSIS % perl -ML -E 'say String::Random->new->randregex("[0-9a-zA-Z]{12}")' DESCRIPTION Module auto-loader for one-liners. This module is dangerous, so don't use this module in other perl modules, scripts or production code. This should be used only in one-liners. DEPENDENCIES

Alex Efros Aristotle Pagaltzis Chris Williams Dan Book Dave Rolsky David Steinbrunner Doug Bell Elvin Aslanov Flavio Poletti Gabor Szabo Gabriel Andrade George Hartzell Geraud Continsouzas Goro Fuji Graham Knop Graham Ollis Ian Sillitoe James Hunt John Karr Karen Etheridge Mark Ellis Martin H. Sluka Martin Kjeldsen Martin Sluka Mary Ehlers Michael G. Schwern NATARAJ (Nikolay Shaplov) Nicolas R Nic

NAME Smart::Options - smart command line options processor SYNOPSIS use Smart::Options; my $argv = Smart::Options->new->argv; if ($argv->{rif} - 5 * $argv->{xup} > 7.138) { say 'Buy more fiffiwobbles'; } else { say 'Sell the xupptumblers'; } # $ ./example.pl --rif=55 --xup=9.52 # Buy more fiffiwobbles # # $ ./example.pl --rif 12 --xup 8.1 # Sell the xupptumblers DESCRIPTION Smart::Options is a lib

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

A required part of this site couldn’t load. This may be due to a browser extension, network issues, or browser settings. Please check your connection, disable any ad blockers, or try using a different browser.

NAME Proclet - minimalistic Supervisor SYNOPSIS use Proclet; my $proclet = Proclet->new( color => 1 ); # add service $proclet->service( code => sub { my $job = $jobqueue->grab; work($job); }, worker => 2, tag => 'worker' ); $proclet->service( code => sub { my $loader = Plack::Loader->load( 'Starlet', port => $port, host => $host || 0, max_workers => 4, ); $loader->run($app); }, tag => 'web' ); $pr