perlでテトリス！ - download_takeshi’s diary
偶然おもしろいモノを発見しました。コンソールで遊べるperlテトリスです。 スクリーンショットとってみました。 なんと、macbookのターミナル上でカラフルなテトリスが元気よく動いてます！ それにしても、俺テトリス下手だな。。。 ってのはおいといて、ソースを見てみましょう。難読化されてます。 #!/usr/bin/perl $_='A=15; B=30; select(stdin); $|=1; select(stdout);$|=1; system "stty -echo -icanon eol \001"; for C(split(/\s/,"010.010.010.010 77.77 022.020.020 330.030.030 440.044.000 055.550.000 666.060.". "000")){D=0;for E(split(/\./,C)){F=0;for
私がiPadを買うべきでない理由：日経ビジネスオンライン
iPadを見た。 買うことになるだろう。 わかっている。どうせ買うのだ。それもたぶん一週間以内に。三日か五日の間買わずに我慢するのは、自分に対する言い訳に過ぎない。あるいは手続きみたいなものだ。よく頑張ったぞオレ、とそう自分に言い聞かせながら、でも結局買う。いつもそうなのだ。セルフおあずけストラテジー。デジタルマゾヒストのティピカルな行動パターンのひとつだ。 見せてくれた編集者氏は、ほとんどアップルのセールスマンだった。それほど全力で私にiPadの魅力をアピールした。 「で、ここをこうするとほらフォトフレームになるわけです」 「……うう……」 「動画も見られますよ」 「……うう……あ……」 「ね。なかなかの画質でしょ？」 「…………」 それにしても、こういうブツをいち早く手に入れた人間は、なにゆえに必ずや布教活動を展開することになるのであろうか。あまた生まれいずる市井のペテロたち。その無償
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
isparade.jp
