2009-06-06から1日間の記事一覧

perlクロージャででfizzbuzz

ほぼjavascriptと同じやんwww sub create_fizzbuzz{ my ($a,$b) = @_; my $n = 1; return sub{ my $str = ''; if($n % $a==0){$str = 'fizz'} if($n % $b==0){$str .= 'buzz'} $str ||= $n; $n++; return $str; }; }; my $fizzbuzz = create_fizzbuzz(3,5); …

javascriptクロージャでfizzbuzz

firebugはいってなければconsole.logがundefinedって言われるかもな。 IEとか。 var create_fizzbuzz = fizzbuzz = function(a,b){ var n = 1; return function(){ var str = ''; if(n % a == 0){str = 'fizz'} if(n % b == 0){str += 'buzz'} str = str || …

PLYMPUS PEN

http://olympus-imaging.jp/pen50th/ もうすぐ発表されるね。 手がとどくくらいなら、欲しいな。 今持ってるレンズもアダプタ付けて使えそうだし。

perlでfizzbuzz

$a = 3; $b = 5; print join "\n",map { my $str; if($_ % $a == 0){$str = 'fizz'} if($_ % $b == 0){$str .= 'buzz'} $str || $_; } (1..100); [参考]http://www.machu.jp/diary/20070509.html#p01剰余を使わないで書くのは、パズル的な楽しさが確かにある…

プロパティ

@interface MyObj : NSObject{ NSMutableDictionary *dic; } @property (nonatomin,retain) NSMutableDictionary *dic; @end @implementation -(id)initWithDic:(NSMutableDictionary *)param { if(self = [super init]){ dic = param; } return self; } -(v…

寝る前に思いついたので、fizzbuzz

my @a = (undef,undef,'fizz'); my @b = (undef,undef,undef,undef,'buzz'); my $a = 0; my $b = 0; for(my $i=1;$i<=100;$i++){ my $str = $a[$a++]; $str .= $b[$b++]; $a = 0 if(@a-0 <= $a); $b = 0 if(@b-0 <= $b); print ($str || $i); print "\n"; }