http://codepad.org/zdeQaPMc perl -le 'do{ print if(/3/||$_%3==0||$_%5==0) } for(1..49);' for 1 〜 49でくるやつは、指定がない場合 $_に代入される。 そいつ自体は文字でも数値でもありえる$_=~ /3/ みたいに正規表現でマッチさせる場合は、暗示的に変…

http://q.hatena.ne.jp/1207585413 の問題 http://codepad.org/8BD5WPWo #!/usr/bin/perl $_ = "ワン ワワンワ ンンワ ンワ ンワ ンワン ワンワ ンワ ワン ワンワ ンワンワンンワン ンワ ンワ ンンンワンワンワンワンワ ワン ワン ワンンンワン ワン ワン ン…

ソースコードでの回答ありがとうございます。 できれば説明がほしかったのですが、自分への試練と思い勉強します。 http://q.hatena.ne.jp/1207585413 がーん('A`)手段が目的にナッテタヨ3のつく数字を判定する方法は関数 itoa(num,buf,10) (既に用意されて…

ほかのosじゃはまります。

/usr/ports/multimedia/ffmpeg && make deinstall /usr/ports/audio/faac && make install /usr/ports/multimedia/ffmpeg && make install x264 enabled yes libfaac enabled yesh264じやなくて libx264 aacじやなくて libfaac

行列 89, 93, 87, 88, 91, 87, 85, 90, 92, 91, 88, 90をプロツトする x <- c(89, 93, 87, 88, 91, 87, 85, 90, 92, 91, 88, 90) y <- c(1:NROW(x)) z <- call('plot', x, y) eval(z)

itoa高速にするなら for(tmp=num;tmp>0;tmp /= 10) *p++; の処理は *p += log( num ) + 1; log(1) = 0 log(5) = 0.69897 log(10) = 1 log(50) = 1.69897 log(100) = 2 log(500) = 2.69897 log(1000) = 3 log(5000) = 3.69897 log(10000) = 4 log(50000) = 4.…