最近使ってるPerlモジュール

Tech Kayac

Mar 22nd, 2013

DBIx::Schema::DSL

DDL生成して、GitDDLと連携して使ってる

Time::Piece::Plus

my $now = localtime;
my $day = $now->add(days => 10);

結構メンテが大変

Path::Tiny

• Path::Classの後継？
• http://www.dagolden.com/index.php/1838/goodbye-path-class-hello-path-tiny/

use Path::Tiny;
my $file = path(...); # file, dir共通
my $content = $file->slurp_utf8;

Exception::Tiny

• 例外のクラス化
• http://blog.yappo.jp/yappo/archives/000802.html
• まあコレでいいんじゃないか

package MyApp::Exception;
use parent 'Exception::Tiny';

package main;
use Try::Tiny;

try {
    MyApp::Exception->throw;
}
catch {
    my $err = $_;
    ...
};

Class::Accessor::Lite::Lazy

• Class::Accessor::Lite に lazy accessorを生やせる

use MyClass;
use Class::Accessor::Lite::Lazy (
    ro_lazy => [qw/hoge/],
);

sub _build_hoge {
    1;
}