やってみたかったからついやってみた。 #!/usr/bin/perl use strict; use warnings; use Data::Dump qw(dump); use DBI; use Test::More; use Test::Exception; use Test::mysqld; use Test::TCP; sub setup_master { # http://dev.mysql.com/doc/refman/5.1…

今まで使ったこと無かったけど、これは便利だ。 #!/usr/bin/perl use strict; use warnings; use IO::String; use XML::Beautify; use XML::Writer; my $osns = 'http://ns.opensocial.org/2008/opensocial'; my $buffer = IO::String->new; my $writer = XM…

現行の関内開催に比較した場合です。平日の終電ドリブンの調査です。 行き先は独断と偏見で抽出しました。 関内 行き先 出発時刻 到着時刻 恵比寿 23:55 00:48 新宿 23:55 01:00 藤沢 00:12 00:46 鎌倉 00:12 00:49 溝の口 23:55 00:41 武蔵小杉 00:12 00:45…