Perl/CPAN/CPAN環境を構築する - Lightweight Languageと暮らす
Proxyを使用する場合 † proxyサーバを利用しなけらばならない場合は、cpanコマンドによる初回問い合わせで入力してもよいのですが、環境変数 http_proxyとftp_proxy 設定しておけばCPAN初期設定画面に表示されます。 以下にhttp_proxy, ftp_proxyの設定例を記します。 export http_proxy=http://proxy_server:8080/ export ftp_proxy=http://proxy_server:8080/ 書式は以下のようになります。 export http_proxy=http[s]://プロキシサーバ:ポート番号/ export ftp_proxy=http[s]://プロキシサーバ:ポート番号/ ↑ CPANコマンドを実行して設定を行う † 基本的にはデフォルトのままで設定が完了できます。 デフォルト値が[
PerlからMemcachedを使う(Cache::Memcached::Fast) - 車輪を再発明 / koba04の日記
Memcachedは色んなサービスで使われていますね。 ということでPerlからMemcachedを使う方法についてを簡単に書いてみます。 Cache::Memcached::FastのPODのままじゃないかというツッコミもありますがその通りです。。簡単で使いそうな部分だけを取り上げているので詳しくはPOD見てください。 http://search.cpan.org/dist/Cache-Memcached-Fast/lib/Cache/Memcached/Fast.pm Memcached？ ものすごくざっくりいうと分散メモリキャッシュサーバーというもので、メモリ上にデータを保存出来て取り出せるというものです。ファイルに書かれた設定やDBのデータをメモリ上にのせておくことで高速にデータの取得を行うことが出来るようになります。 詳しくはgihyo.jpにあるkazeburoさんの連載を見て
TheSchwartzもはじめました - Perl日誌
GearmanとTheSchwartz Gearmanに投げた仕事は無事完了したかどうかはよくわかりません。 途中でサーバーダウンしていた場合にどの処理が完了していて、どの処理が未完了なのか、わかりかねます。 TheSchwartzは引き受けた仕事を逐一DBに記録します。なので完了した処理と未完了の処理を区別する事ができます。 DBセットアップ vi db/schwartz.sql DROP TABLE IF EXISTS funcmap; CREATE TABLE funcmap ( funcid INTEGER PRIMARY KEY AUTOINCREMENT, funcname VARCHAR(255) NOT NULL, UNIQUE(funcname) ); DROP TABLE IF EXISTS job; CREATE TABLE job ( jobid INTEGER P
Catalyst::Controller::Resouce を使って、Chained アクション書くのを楽する
新しく作った開発プロセスの問題点が見えたわけだから、それはそれとして改善すればいいのに。プロジェクトに併せてテーラリングされてないのとか。そういうことを自発的にやれる人たちが必要だというのもわかるけど ■ [catalyst][chaostr] Catalyst::Controller::Resouce を使って、Chained アクション書くのを楽する 追記(2009-05-20T16:46:42+09:00) 現在は Catalyst 5.8 系に対応した C:C::Resources がリリースされており、この方法は使用できません。 Catalyst 5.7 系 + C:C::Resources 0.4 系であれば使用可能です。 追記(2009-06-15T01:02:03+09:00) perl-mongers.org に Cat 5.8 系の話を書きました。 Catalyst::
List::MoreUtils - モダンなPerl入門 - モダンなPerl入門
リスト処理 List::Utilでできないリスト操作はList::MoreUtils を覗くと見つかるかも つかいかた use strict; use warnings; use List::MoreUtils qw(any all); List::MoreUtilもメソッドをExportしないから注意が必要です。 使いたいものだけExportするか use List::MoreUtils qw(:all); で全部Exportして使えます。 any $v = any {$_ < 10} 1..10; # 真 リストを評価して要素の一つでも条件を満たすと真、満たさなかったら偽を返します。 リストが空ならundefを返します。 all $v = all {$_ < 10} 1..10; # 偽 リストを評価して全ての要素が条件を満たすと真、満たさなかったら偽を返します。 リストが空ならund
Moose::Manual::Types - Moose's type system - metacpan.org
NAME Moose::Manual::Types - Moose's type system VERSION version 2.2207 TYPES IN PERL? Moose provides its own type system for attributes. You can also use these types to validate method parameters with the help of a MooseX module. Moose's type system is based on a combination of Perl 5's own implicit types and some Perl 6 concepts. You can create your own subtypes with custom constraints, making it
Data::YUID - Distributed ID generator ("Yet another Unique ID") - metacpan.org
NAME Data::YUID - Distributed ID generator ("Yet another Unique ID") SYNOPSIS ## Generating a unique ID within a particular process... use Data::YUID::Generator; my $generator = Data::YUID::Generator->new; my $id = $generator->get_id; ## Generating a unique ID from a set of distributed servers... use Data::YUID::Client; my $client = Data::YUID::Client->new( servers => [ '192.168.100.4:11001', '192
第10回 ジョブキューで後回し大作戦―TheSchwartz、Qudo、Q4M（1） | gihyo.jp
本連載では第一線のPerlハッカーが回替わりで執筆していきます。今回のハッカーはnekokakさんこと小林篤さんで、テーマは「ジョブキューで後回し大作戦」です。 ジョブキューとは 一時代前は時間のかかる処理もすべてWebアプリケーションで行っていましたが、最近ではいろいろな部分で処理の非同期化が行われるようになってきました。たとえばWebのインタフェース側ではAjaxがその最たるものでしょう。アプリケーションのバックグラウンド側でも今回のテーマであるジョブキューと呼ばれるしくみが多く利用されるようになりました。ジョブキューを賢く上手に利用することで、ユーザにストレスを与えることなく、またサーバのリソースも有効に使えるようになります。 ジョブキューは延々と動き続けるバッチ処理、というイメージが最もわかりやすいでしょう。通常のバッチ処理であればcrondを利用し、一定周期でプログラムを起動して
Test::Class
NAME Test::Class - Easily create test classes in an xUnit/JUnit style VERSION version 0.51 SYNOPSIS package Example::Test; use base qw(Test::Class); use Test::More; # setup methods are run before every test method. sub make_fixture : Test(setup) { my $array = [1, 2]; shift->{test_array} = $array; } # a test method that runs 1 test sub test_push : Test { my $array = shift->{test_array}; push @$arra
Test::More - yet another framework for writing test scripts - metacpan.org
NAME Test::More - yet another framework for writing test scripts SYNOPSIS use Test::More tests => 23; # or use Test::More skip_all => $reason; # or use Test::More; # see done_testing() require_ok( 'Some::Module' ); # Various ways to say "ok" ok($got eq $expected, $test_name); is ($got, $expected, $test_name); isnt($got, $expected, $test_name); # Rather than print STDERR "# here's what went wrong\n
Catalyst
NAME Catalyst - The Elegant MVC Web Application Framework SYNOPSIS See the Catalyst::Manual distribution for comprehensive documentation and tutorials. # Install Catalyst::Devel for helpers and other development tools # use the helper to create a new application catalyst.pl MyApp # add models, views, controllers script/myapp_create.pl model MyDatabase DBIC::Schema create=static dbi:SQLite:/path/to
Params::Validate
NAME Params::Validate - Validate method/function parameters VERSION version 1.31 SYNOPSIS use Params::Validate qw(:all); # takes named params (hash or hashref) sub foo { validate( @_, { foo => 1, # mandatory bar => 0, # optional } ); } # takes positional params sub bar { # first two are mandatory, third is optional validate_pos( @_, 1, 1, 0 ); } sub foo2 { validate( @_, { foo => # specify a type {
Moose::Meta::Attribute - The Moose attribute metaclass - metacpan.org
NAME Moose::Meta::Attribute - The Moose attribute metaclass VERSION version 2.2207 DESCRIPTION This class is a subclass of Class::MOP::Attribute that provides additional Moose-specific functionality. To really understand this class, you will need to start with the Class::MOP::Attribute documentation. This class can be understood as a set of additional features on top of the basic feature provided
UNIVERSAL::require - require() modules from a variable [deprecated] - metacpan.org
NAME UNIVERSAL::require - require() modules from a variable [deprecated] SYNOPSIS # This only needs to be said once in your program. require UNIVERSAL::require; # Same as "require Some::Module" my $module = 'Some::Module'; $module->require or die $@; # Same as "use Some::Module" BEGIN { $module->use or die $@ } DESCRIPTION Before using this module, you should look at the alternatives, some of whic
CPANモジュールのアンインストール - holidays-l開発ブログ
エントリの続きはこちら→CPANモジュールのアンインストール（改良版） - ヒルズで働く@robarioの技ログ あるCPANモジュール（以下ディストリビューションと呼びます）をアンインストールしてみます。 まずは色々紹介しながら回りくどくやってみます。最後に簡単な方法を紹介します。 消したいディストリビューションを確認 自分が消したいディストリビューションが分からなかったら、 % perldoc -tT perllocal | grep Module # 見た目より速さ優先ならこっち % grep Module `perldoc -l perllocal` でインストール履歴が出ます。perllocal.podにはインストールしたディストリビューションの一覧が時刻と共に記録されていて「昨日インストールしたアレアレ…何だっけ？」という時には割と使えます。 モジュール名とディストリビューショ
Data::ObjectDriver
& COPYRIGHT Adam Thomason Akira Sawada Ben Trott Brad Choate Brad Fitzpatrick Brad Whitaker David Steinbrunner Garth Webb Graham Blankenbaker Jonathan Steinert Kenichi Ishigaki Kevin Goess Mark Paschal Mart Atkins Masahiro Iuchi Mischa Paul Lindner Sekimura Simon Wistow Takatsugu Shigeta Taku AMANO Tatsuhiko Miyagawa Tsuyoshi Watanabe Yann Kerherve ambs ziguzagu NAME Data::ObjectDriver - Simple, t
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Debianにmemcachedをインストールし、Perlから接続する
はてなブログ | 無料ブログを作成しよう
Catalyst::Model::REST - REST model class for Catalyst - metacpan.org
MooseX::Params::Validate - an extension of Params::Validate using Moose's types - metacpan.org