perl - 勝手に拡張 - tie my %hash, 'FizzBuzz' : 404 Blog Not Found

2007年05月09日04:00 カテゴリLightweight Languages perl - 勝手に拡張 - tie my %hash, 'FizzBuzz' ここまで来れば、さらに一押ししたいのがHackerとしての人情。 PERL HACKS(日本語版) [英語版] Unknown::Programming - Fizz-Buzz問題 tie my %fizzbuzz , 'FizzBuzz'; こういうことをしたいとする。 tie my %fizzbuzz, 'Tie::Code' => sub { $_[0] % 15 ? $_[0] % 5 ? $_[0] % 3 ? $_[0] : 'Fizz' : 'Buzz' : 'FizzBuzz'; }; print "$fizzbuzz{$_}\n" for (1..100); 答えは感嘆せざるをえないほど簡単だ。 packag

[fbis]

Tie::Function、Interpolation

[cooldaemon]

Tie::Funciton の再発明

[kmachu]

「tie」ってなんだっけ？Perlブランクがひどいな…。