この記事はPerl Advent Calendar 2014の18日目の記事です。 17日目の記事はid:kfly8さんの間接オブジェクト記法のアンチパターンでした。 Time::Piece::Iterator Time::Piece::Iterator 指定した範囲内の日付時刻を、指定した間隔で反復するモジュールが欲し…

階層の深いディレクトリを作成するとき、mkdir -pのように一気に作ろうとrecipeを作った。 directory '/home/user/foo/bar' do owner 'user' group 'user' mode '0755' recursive true end しかし、これだとownerとgroupとmodeの指定が、一番深い階層のディ…

日付が月末かどうか判定する処理、今までもっと無駄に書いてた気がするけど、こんな感じで良かった。 use Time::Piece; my $now = localtime; if( $now->mday eq $now->month_last_day ) { print "月末！", "\n"; }

調査依頼された時、結果だけ伝えるのではなく、過程もある程度伝えたほうが良い。あれやこれはやったか？という確認をする手間も省けるし、過程に誤りがあった場合に指摘がしやすいので効率的。

Chiba.pm #5に参加し、LTもして来ました。 初めてこういった場でLTをさせて頂いたので、とても緊張しましたが、良い経験になりました。 Path::Tiny from waniji （reveal.jsで作った資料をPDFエクスポートしたらレイアウト崩れてしまいました） 内容は、最近…

ISUCON4の予選にkyokomiとyasuunとチームを組んで参加してきました。 1日目に参加し、最終送信結果は15107、benchmark v2では17124と予選通過には程遠いスコアでした。 しかも、AMI審査方法の通りに実行してみたら見事にレギュレーション違反！ 来年リベンジ…

去年初めて参加したYAPC::Asia。2回目の参加です。 ちゃんと感想を書いて、今年のYAPCを終えようと思います。 印象に残ったセッション Releasing perl ドキュメントの充実や開発プロセスの簡略化にかなり力を入れていて、 長く続けていくにはこういった地道…

参考にさせていただいた記事 検索・置換に便利なヤンク（レジスタ）【Vimコマンド】にさん追加7/3 - YKMbPP やりかた Ctrl+rを押した後"を入力すると、入力モードやコマンドラインモードでもヤンクした内容をペースト出来るようなので、以下の手順で複数行ペ…

やること Heroku上でHubotを動かす SlackとHubotを連携する Hubotリポジトリに変更があればTravis CIに検知させて自動デプロイ デプロイ完了したらSlackに通知 以上を無料枠で 前提 Mac OSX 開発環境として使用 以下のアカウントは作成済み Slack GitHub Her…

経緯 数千万行あるファイルに対して1行ごとに処理するようなバッチを書く utf8フラグ付きの文字列をencode_utf8せずに処理してしまう 大量のWide character in ...という警告がログに出力される 気付かずに本番リリースされ、それが原因で障害発生 悲しみに…

バージョン Path::Class 0.33 Path::Tiny 0.056 オブジェクト生成 Path::Classで生成したオブジェクトは、ファイルはPath::Class::File、ディレクトリはPath::Class::Dirとなる。Path::TinyはどちらもPath::Tinyとなる。 # Path::Class $file = file($path);…

移動先のディレクトリ作成 find /from -type f -mtime +31 | xargs -I {} dirname {} | sort | uniq | sed 's!/from!/to!g' | xargs mkdir -pv ファイルを移動 find /from -type f -mtime +31 | sed 's!\(/from\)\(.*\)!\1\2 /to\2!g' | xargs --max-args=2 …

Perl 5.8.8で試してみた。 waniji@localhost:~$ plenv versions system 5.18.2 * 5.8.8 (set by /home/waniji/.plenv/version) waniji@localhost:~$ cpanm -lextlib File::Spec --> Working on File::Spec Fetching http://www.cpan.org/authors/id/S/SM/SMU…

技術と関係ないことをまとめる場所

初めに 以下のドキュメントにCarpの詳細説明があるので、それを読めば挙動が分かります。 Carp - モジュールのための warn と die の代替 この記事では、実際に継承してるコードを例に出して説明しようと思います。 コードと実行結果 client.pl #!/usr/bin/e…

carton bundleを実行すると、App::FatPackerを用いて、cartonを1ファイルのスクリプトにまとめてくれます。 このfatpacked cartonをCentOS5のsystem perl(5.8.8)で使用したかったのですが、carton bundleで生成されたfatpacked cartonを実行すると、エラーが…

先月からAsakusaSatelliteというチャットアプリケーションを使い始めた。 今のところ、とてもいい感じに運用出来ているので、色々とまとめ。 なぜ導入したか 社内のコミュニケーションはHipChatを用いて行っているが、 業務を行っている場所では深遠な理由で…

環境 GitLab 6.4.3 タイムゾーンの初期値 GitLabは、Railsのタイムゾーンの初期値であるUTCとなっている。 OSのタイムゾーンを使用してくれないので、設定ファイルを修正する必要がある。 タイムゾーンの変更 config/application.rbを編集 cd /home/git/gitl…

2013年をまとめ。 Perl Perlを本格的に学び始めた。 はじめてのPerlを読みながら例題を解いて基礎を学び、一枚岩のスクリプトをガリガリとコーディング。 DBI使ってDBと連携、packageの作成、blessを使ったOOP、OrePANを使ったCPANのローカルミラー作成など…