タグ

2008年10月10日のブックマーク (3件)

  • ウィザードリィ - Wikipedia

    『ウィザードリィ』(Wizardry)は、1981年に米国のサーテック社からApple II用ソフトウェアとして発売された3DダンジョンRPGのシリーズである。 現在のロールプレイングゲームRPG)の発展に大きく影響したシリーズであり、特に初期作品はドラゴンクエストシリーズ[1]やファイナルファンタジーシリーズ[2]などのRPGに多大な影響を与えた。 サーテック社は2001年に発売された『ウィザードリィ8(英語版)』を最後に倒産し、以降はシリーズの版権を取得・ライセンス供与を受けた日企業によるスピンオフ作品が発表され続けている。詳細は#版権元の変遷にて。 シリーズ作品[編集] サーテック社より発売されたオリジナルタイトルは1981年の『ウィザードリィ 狂王の試練場』から2001年の『ウィザードリィ8(英語版)』が存在する。 日においては、上記をローカライズした作品のほか、1991年に

  • Perl Quiz - package名について - Islands in the byte stream (legacy)

    Q.以下のテストケースが失敗するようなf()を書いてください。ただし,ライブラリを使用してはいけません。回答は一週間後くらいに。 #!perl -w use strict; use Test::More 'no_plan'; sub f{ # 何かする } f(); is ref(bless({}, 'Foo')), 'Foo'; __END__ sv_derived_from()を刻んでいるうちに見つけたちょっと変な挙動です。 2008/10/08 追記 (現トラックバック数:7) 皆さん解答ありがとうございます!意外なやり方もいくつかあって驚きました。 あとで詳しく紹介&解説したいのですが,今は定期演奏会やら学祭やらで忙しいので,また後ほど。

    Perl Quiz - package名について - Islands in the byte stream (legacy)
  • Perl Quiz - Practice of Programming

    こちらの問題。 http://d.hatena.ne.jp/gfx/20081007/1223340787 回答がすでにいろいろ出てるけど。 これで。 #!/usr/bin/perl use strict; use Test::More 'no_plan'; sub f{ my $builder = Test::More->builder; my $out = $builder->output; print $out <<_TEST_; not ok 1 # Failed test at q.pl line 17. # got: '' # expected: 'Foo' _TEST_ $builder->output(*HOGE); sub Foo::DESTROY {$builder->output($out)} } f(); is ref(bless({}, 'Foo')), 'Foo

    Perl Quiz - Practice of Programming