借りてきたラクダ本に力をわけてもらった. まだ1章だけど. リストコンテキストはちょっと楽しい. #!/usr/bin/env perl use strict; use warnings; my (%count, %min); for(my $i=1;;$i++) { my $cube = $i**3; my $key = join '', sort $cube =~ /./go; $min…

HaskellのMonadをJavaScriptで実装するとしたら - ラシウラ を参考にほとんど写経. #!/usr/bin/env perl use strict; use warnings; sub parse { my ($parser, $input) = @_; return $parser->({ result => [], source => $input, index => 0, }); } sub bin…