Perl の Time::Piece 利用上の注意点 - Hatena Developer Blog
こんにちは、アプリケーションエンジニアの id:nanto_vi です。この記事ははてなデベロッパーアドンベントカレンダー 2015 の 2 日目です。 Perl で日時を扱うモジュールのひとつに Time::Piece があります。コアモジュールなので手軽に使えますが、Perl - Time::Piece に関するとりとめのないコト - Qiita にもまとめられているように注意すべき点も多いです。ここでは、そのような注意点をいくつか挙げていきたいと思います。 なお、以下のコードは Time::Piece 1.31 で確認しています。 タイムゾーン情報を持たない 大前提として、Time::Piece のインスタンスはタイムゾーン情報を持っていません。持っているのはローカル時間か GMT かの区別のみです。その「ローカル時間」が実際にどのタイムゾーンなのかは、環境 (環境変数 TZ の値な
最近の Plack のパフォーマンス改善まとめ 2015年11月版 - Hateburo: kazeburo hatenablog
OSS活動の成果発表のお時間です。 Plackの 1.0038と2015年11月27日時点のmasterにはPlack::Request、Plack::Responseのパフォーマンスをあげる変更が入ってます。その紹介とベンチマークです。 github.com Plack 1.0038 で HTTP::Headers::Fast 0.20 につけた flatten メソッドを使うようになってます。Plack::Response->finalizeのパフォーマンス向上が期待できます。 github.com こちらはまだmasterにmergeされた状態。リリースはされてない。POSTリクエストのパースにHTTP::Bodyではなく、HTTP::Entitiy::Parserを使い、パラメータのパースに WWW::Form::UrlEncodedを使うようになっています。 HTTP::Enti
perlでdownload speedに制限をかける - skaji's blog
なぜかhttp getのときdownload speedに制限をかける必要が度々発生するので、そのやり方を考えてみた。 dataをgetして、data取りすぎのときテキトーにsleepを入れれば一応達成できた。 LWP::UserAgent, HTTP::Tiny でのやり方は以下。 use strict; use warnings; use LWP::UserAgent; use HTTP::Tiny; use Time::HiRes (); my $LIMIT_UNIT_SECOND = 0.001; sub limit_data_callback { my ($fh, $limit_bps) = @_; my $previous = [ [Time::HiRes::gettimeofday], 0 ]; sub { print {$fh} $_[0]; my $elapsed = T
h2o の fastcgi サポートで Plack::Handler::FCGI を動かす - tokuhirom's blog
h2o で PHP を FCGI で動かすという話題が最近見かけますが､もちろん h2o+FCGI+Perl も快適に動作します｡ 具体的には以下のように書けばよろしい｡ listen: 9090 hosts: default: paths: /: file.dir: /path/to/htdocs/ fastcgi.spawn: "exec /opt/perl-5.18/bin/plackup -s FCGI --nproc 10 /path/to/app/" 簡単すぎて､とくに解説することがないです｡ h2o+FCGI で運用した場合のメリットとして､Starlet 等の application server を立ち上げる場合と異なり､application server のプロセスを daemon tools や systemctl 等で管理する必要がないというメリットがある｡ 一方
cpan module を並列でインストールする - skaji's blog
先日行われた Gotanda.pm #5 でも発表させていただいたが、まさしく experimental な cpan client cpm を作った。 github.com Why new? cpan module の install にはいつも cpanm を使っており そのシンプルさと安定性には感心するばかりである。 が、cpanmにも不満がないわけではない。 perlである程度のことをやろうとすればすぐにcpan moduleの依存は 100を超える。 そういった場合、cpanmは直列でcpan moduleをインストールしていくため かなりの時間がかかる。 これをなんとかしたい。 Features of cpm cpm は如何に速くcpan module をインストールするか、しか考えていない。速くするために以下のようにしている。 cpanm を並列に使って cpan modul
Milla, a Dist::Zilla profile that doesn’t suck (screencast)
Ok, that was a little link bait title. I’ve been a big fan of Module::Install — it automatically figures out the metadata of my module with just all_from, and does the right thing creating META files. Then it bundles itself in inc/ so that if you install from CPAN you don’t need to have Module::Install pre-installed. But not everybody likes it, especially contributors who need to install plugins b
How FatPacker Works - skaji's blog
https://metacpan.org/pod/App::FatPacker について知るしかない！ What is FatPacker? perlを実行したら Can't locate Moo.pm in @INC... などとでてくることは日常茶飯事である。 これは文字通りMoo.pmがないからであり、おそらく cpanm Moo とすれば解決する。 しかし めんどくさい Can't locate Moo.pm in @INC と出た時点で放棄する人が続出する などの理由によりこれをなんとかしたい。 ここで出てくるのが FatPacker である。すなわちFatPackerはスクリプトに依存モジュールをすべて同封してくれる。 How FatPacker Works 例として script.pl は Hello module を require しているとしよう。 > cat scri
perl の require を知る - skaji's blog
今、perlがあつい！よって require について知るしかない！ "普通" のrequire require(もしくはuse)関数は Module をロードしたいときに使う。 例えば、 require Foo::Bar; # もしくは use Foo::Bar とすると、perlは@INCに入っているディレクトリ以下のFoo/Bar.pmファイルを探しload(eval)しようとする。 すなわち仮に@INCが @INC = ("/path/to/dir1", "/path/to/dir2", "/path/to/dir3") ならば、perlは 候補1: /path/to/dir1/Foo/Bar.pm 候補2: /path/to/dir2/Foo/Bar.pm 候補3: /path/to/dir3/Foo/Bar.pm の順に Foo/Bar.pm を探し、見つかった時点でそれをlo
本番環境でのperl/ruby/nodeのセットアップ - たごもりすメモ
本番環境にperlとかrubyとかnodeを入れるんだけど、もちろん system perl じゃやってられないので指定したバージョンのものを一般ユーザの管理下に突っ込みたい。 で、そういうのをこれまで perlbrew とか rvm とか rbenv とか nvm とか nodebrew とかでやってたんだけど、さすがに色々疑問が湧いてきた。バッチで単発実行するために eval "$(rbenv init -)" とかさすがにおかしくね？ みたいな。 ということで tokuhirom method 的にインストール用の簡単コマンドを使って実行、あとはパスを通せばいいじゃん、ということにしようかと思う。 参考: サーバーのセットアップは perlbrew とかじゃなくてよくね? という時のライフハック - blog.64p.org これ、今朝までは Perl::Build をどうにかしてC
ppencode 2 - 任意の Perl コードを予約語だけの Perl コードに変換する - 兼雑記
@TAKESAKO さんが ppencode を作ってから 10 年経って、私が任意の Perl コードを小文字だけに変換するスクリプトを書いてからでも5年経つらしいですが、なんか任意の Perl コードを予約語だけの Perl コードに変換するスクリプトができました。 http://shinh.skr.jp/obf/ppencode.html オリジナルの ppencode に敬意を表していろいろ雰囲気を似せておきました。割と色んな予約語が使われるようにしてみたりとか。 これは Perl が予約語だけあれば Turing complete ということなので、副産物として Quine もできました。 http://golf.shinh.org/reveal.rb?Quine/shinh+%28keywords%29_1431106882&pl なんというか、 ppencode があれば後は
大規模画像配信とPerl
1. The document discusses various image processing libraries and tools including Image::Magick, Imlib2, and Epeg. 2. It provides code examples for resizing, scaling, and writing images using these libraries. 3. Benchmark results are shown for operations performed with each library, such as reading and writing files, to compare performance.Read less
Perl開発者Larry Wall氏が、Perl 6.0の正式バージョンを2015年のクリスマスにリリースすると発言、Perl開発者の中には懐疑的な見方も
Perlの開発者であるLarry Wall氏が、ブリュッセルで開催中のオープンソース開発者カンファレンス「FOSDEM」において、2月1日（現地時間）に、同氏が2015年に61歳の誕生日を迎えることを明らかにするとともに、Perl 6.0のバージョン1.0を2015年のクリスマスにリリースすると発言した。 Perlは現在、最新バージョンであるPerl 5系列と、開発中のPerl 6系列に分岐しており、Perl 6の開発は2000年のスタート以来、難航している。なお、Perl 6では言語仕様の大幅な変更が行われており、Perl 4やPerl 5との後方互換性が失われる。 今回のLarry Wall氏の発言について、Perl開発者の中には懐疑的な見方もあり、今回の発言によって、2015年のクリスマスにPerl 6のバージョン1.0が確実にリリースされるわけではないが、バージョン1.0について語
map {; ... } LIST - skaji's blog
https://github.com/rjbs/App-Uni/blob/master/bin/uni#L12 @ARGV = map {; decode('UTF-8', $_) } @ARGV; 上記 map {; のセミコロンの意味がわからずもやもやしていた。 そんな中、まさにそれの説明が perlfunc.pod に追加された。 http://perl5.git.perl.org/perl.git/commitdiff/24fe90a14d91f512527a158a02ea19d502723856 "{" starts both hash references and blocks, so "map { ..." could be either the start of map BLOCK LIST or map EXPR, LIST. Because Perl doesn't
Perlはもう古い、これからはDocker - ゆううきブログ
本記事の内容はWEB+DB Vol.88 Perl Hackers Hub 第34回 に「DockerによるPerlのWebアプリケーション開発」という記事にまとめなおしていますのでそちらをご覧ください。 「Perl Hackers Hub」では、「DockerによるPerlのWebアプリケーション開発」と題して@y_uuk1さんにご執筆いただきました！Dockerの基本的な考え方からPerlのWebアプリ向けのDockerfileの書き方まで、実践的な内容です！ #wdpress— WEB+DB PRESS編集部 (@wdpress) 2015, 8月 22 この記事は Perl Advent Calendar 2014 の19日目の記事です。 Plack/Carton で構築したモダンな Perl の Web アプリケーションの開発環境を Docker 化するための試行錯誤を紹介します
第18回 Amon2によるWebアプリケーションの高速開発（3） | gihyo.jp
（1）はこちら、（2）はこちらから。 スケルトンに掲示板機能を付けてみる スケルトンを眺めているだけではおもしろくないので、スケルトンをベースに実際に掲示板機能を付けてみましょう。 掲示板のスキーマ 今回、セットアップが簡単なようにデータベースにはSQLite3を用います。sql/sqlite3.sqlに次のように書きましょう。 CREATE TABLE IF NOT EXISTS sessions ( id CHAR(72) PRIMARY KEY, session_data TEXT ); CREATE TABLE IF NOT EXISTS entry ( entry_id INTEGER NOT NULL PRIMARY KEY, body varchar(255) not null ); sessionsテーブルはセッションの保存用テーブルです。 コントローラの実装 コントロー
第21回 Carton & cpanm―Perlモジュール管理最新事情（3） | gihyo.jp
（1）はこちら、（2）はこちらから。 Carton Cartonもcpanmと同様に、宮川達彦さんを中心に開発しているツールです。Cartonがどんなツールかについては、PODにズバリな一文があるので引用します。 carton is a command line tool to track the Perl module dependencies for your Perl application. 「Cartonとは、アプリケーションにおけるPerlモジュールの依存関係を管理するコマンドラインツール」というわけです。 また、PODのNAMEセクションには次の記述があります。 Carton - Perl module dependency manager (aka Bundler for Perl) Rubyでお馴染みのBundlerという単語が出てきました。Rubyを使う人にはこちらの
第26回 Perlで困ったときの調べ方（1） | gihyo.jp
本連載では第一線のPerlハッカーが回替わりで執筆していきます。今回のハッカーはcharsbarこと石垣憲一さんで、テーマは困ったときの調べ方です。 検索エンジンを頼りづらいPerl Perlを使い始めて間もない人を悩ませる問題の一つに、複雑なデータ構造のデリファレンスや、配列・ハッシュのスライス、コンテキストを特定するための演算子、特殊変数など、各種の記号や括弧を駆使したPerl特有の書き方がGoogleなどの検索エンジンでは事実上検索できない、というものがあります。また、モジュールを使えば楽ができると知ってはいても、結局どのモジュールを使えばよいかよくわからない、というのもよく聞く悩みです。 本稿では、このようなPerlを使っていて困ったときの調べ方をおさらいします。 Perl特有の書き方を調べる 書籍の目次や索引から調べる Perlコミュニティは総じて後方互換性を大事にしてきました。
職業としてのPerlを書き続けることの難しさとPerl教育革命 - はてな村定点観測所
2014-08-26 職業としてのPerlを書き続けることの難しさとPerl教育革命 もうすぐ、世界最大のPerlの祭典・YAPC::Asiaですね。 私も２日間、慶應義塾日吉キャンパスまで遊びに行きます。 ただ、最近やはり正直Perlに関して思うところはあるんですよね〜。職業としてのPerlを選択できる道は年々狭くなっているなと。それこそ針の穴をラクダが通るよりも難しい。 以前、「ついに顕在化し始めたPerlリスク」なんて増田の投稿が出たりして、詳しい人から手斧が投げられたりしましたが、やはり年々Perlを採用する企業は増えていないし、YAPCのスポンサーを見ていても毎回ほぼ同じ企業が並びますよね。スピーカーも人気を集める人は固定化されてて、（Perlだけじゃない話をする場とはいえ）インフラ系の話題の比重も大きくなっています。 私は1999年にPerlの魅力に触れてから、ずっとPerlを
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
GitHub - tokuhirom/Perl-Build
GitHub - tagomoris/xbuild: Language runtimes installer for production environment
