揮発性のメモ2

http://d.hatena.ne.jp/iww/

2011-05-11から1日間の記事一覧

openの使い方

if( open my $fh, "> hoge" ){ print $fh "hello,world\n"; close $fh; }else{ die("open:$!"); }

ファイルハンドルを使うときのヒアドキュメント

open my $fh, '| cat'; # print $fh << __HOGE__; # 動作しない print $fh <

地震

30年以内に87%の確率で発生するということは、だいたい毎年6%ちょいくらいの確率で発生するということか・・・ (1-n)^30 = 1-0.87 (1-n) = (1-0.87)^(1/30) n = 1-(1-0.87)^(1/30) = 0.0657464034 これは確かに原発停止したくなる数字だな