Results for tag "perl"

YAPC::Asia::2011で酒飲んできた(あれ?)

Perlの祭典YAPC::Asia TOKYO 2011 [Oct 13 – Oct 15]に初参加しました。

13日(前夜祭)

会社の堅苦しい研修とはワケが違います。
会場に行ってすぐにビールを勧められて「えっ?大丈夫なの?」と思いましたが、いつの間にか3本いってしまい発表そっちのけで遊んでました。

Perl Mongerなりきり同人カードゲーム「Parumon」をやっている作者と主催者の図

14日(Day1)

Hachioji.pmとNiigata.pmのメンバーが集まって一緒にお昼ご飯を食べました。
Hachioji.pmメンバーでスキーがてらNiigata.pmに行く計画も出ています、

懇親会は人がいっぱい!スターたちがいっぱいでした。miyagawaさんに握手してもらってAcme!
札幌出身なのでHokkaido.pmにご挨拶に行ったら、techno_nekoさんがブログ(ネタポスト)を見てくれていたようでうれしかったです。次実家に帰る時はHokkaido.pmにお邪魔したい。

15日(Day2)

それなりに発表は見ていたのですが、2日連続飲んでたので写真をほとんど撮ってなかった。
写真じゃ凄さが伝わらないOtoPerlとか、p5-Games-BeLike-EightBITを見て感動してたのもある。

この後はYAPC::Asia 2011 勝手に後夜祭に参加して3日連続で飲む事になる。

感想とか

個人スポンサーはおすすめ

技術的な貢献ができるレベルではないので、個人スポンサーで少しでも貢献できればと思っていましたが、個人スポンサー限定ノベルティが貰えますし、スタッフの方とお話しするきっかけができたので安いもんだと思います。

地域.pm

Hachioji.pmに参加していたからYAPC::Asiaに参加できて楽しめた。
今までだったら自分のような低レベルの技術者がいきなり巨大なイベントに参加しても、ぼっち確定だった。
同じような不安を持っている方がいたら、ぜひ最寄りの地域.pmに参加してきっかけを作ってほしいと思う。

特にHachioji.pmね!

高尾山登ったり町田に行ったり、新潟に遠征行くかもしれないノマドなpmですよ!

名言

「テストを書かなくていいのは小学生まで」
「攻めの運用」
「パルモンの推奨年齢は6歳以上」
「ももクロ」

[Perl]八王子.pm参加者まとめ

八王子.pmの参加者をまとめてみた。

サイトが見当たらなかった方はtwitter、複数サイト持ってる方は独断で1つに絞っています。

umeyukiさん http://www.umeyuk-i.com/
hondallica(ぼくちゃん) http://sukuna.net/

(おまけ)Twitterリスト http://twitter.com/#!/list/hondallica/hachiojipm

[Perl]画像用data URL schemeを作る

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
use strict;
use warnings;
use IO::File;
use MIME::Base64;
 
# 対象ファイル
my $file = $ARGV[0];
 
# 拡張子から画像のMIMEタイプを取得
my $mime = $1 if $file =~ /\.(gif|jpe?g|png)$/;
$mime = 'jpeg' if $mime eq 'jpg';
 
# $dataに画像ファイルの中身を取得
IO::File->new($file, 'r')->read(my $data, (stat($file))[7]);
 
# BASE64エンコードして改行を除去
my $base64 = encode_base64($data);
$base64 =~ s|\n||g;
 
# data URL scheme(RFC2397)を表示
print "data:image/$mime;base64,$base64";