Perl Quiz に挑戦して負けました(追記有り) - だるろぐ の。軽い気持ちで聞いてみたら大変な事に。どうしてこうなった。 おさらい。 問題 http://quill.to/yoshiki/0a66f62e14 条件 「できれば1行」 プログラマには「できれば」の文字は見えません。 尚、阿呆な解釈をすれば「1;2;3;4;も1行だよね!」となりますが、プログラマにはそんな解釈する人は居ません。 普通に考えれば「one sentence」ですね。後で覆されるんですが。 はい開始開始。 まずプログラマ失格な残念賞から。 もっとがんばりましょう 俺。 http://gist.github.com/337522 my $a_ref2 = \$a_ref; $a_ref2 = \$$a_ref2->{$_} for split /\./, $key; $$a_ref2 = $value; 1行