詰め碁ばっかやってる

29級で停滞中。

ProductName 誰でもカンタン! 趙治勲の詰め碁

毎日コミュニケーションズ / ¥ 5,040 (2006-09-14)
在庫あり。

goxiなんていうのがあんのね。

そういえば農業SNSあぐりってのに入ってたんだけどスパム多すぎで退会したんだった。

open pneで簡単にSNSがつくれるようになるのはいいんだけど、一方で簡単にスパム汚染されてしまうようになってくると、もうSNSじゃなくていいじゃんみたいな方向に行ってしまうんだよねぇ。

詰め碁26級

やっと26級。頭で解いて上がっていくというよりは、同じ問題がリピートしてきて、覚えてるから数をこなせば昇級していく感じ。

つまるところあんまり嬉しくない。

ProductName 誰でもカンタン! 趙治勲の詰め碁

毎日コミュニケーションズ / ¥ 5,040 (2006-09-14)
在庫あり。

来週の京都出張の新幹線の中でもやりまくる予定。

METAMORPHOSE 09にSmith & Mighty

ヤバイ、ヤバすぎ!

ProductName Life Is...
Smith & Mighty
K7 / ¥ 1,684 (2002-04-30)
一時的に在庫切れですが、商品が入荷次第配送します。配送予定日がわかり次第Eメールにてお知らせします。商品の代金は発送時に請求いたします。

ProductName Bass Is Maternal
Smith & Mighty
More Rockers / ¥ 1,684 (2000-06-20)
一時的に在庫切れですが、商品が入荷次第配送します。配送予定日がわかり次第Eメールにてお知らせします。商品の代金は発送時に請求いたします。

楽しみになってきた。

もちろんRichie Hawtinも。

市民農園が一区画当たった

ラッキー。早速5時前に起きてチャリで偵察に行ってきた。

結構遠い。

1240485669 1240485665

ぬー、草ぼうぼうだ。週末に鍬とかシャベルとか買って耕しにいく。

Rubyによるデザイン・パターン

気になる本。

ProductName Rubyによるデザインパターン
Russ Olsen
ピアソン桐原 / 3990円 ( 2009-04-01 )


MooseでLispを実装してみる(RPL)

やさしい Lisp の作り方 by Java and by C#を参考に書いてみる。

READ-PRINT-LOOPまでのものを動かしてみる

$ perl moosp.pl 
Moosp> (1 2 3 4)
(1 2 3 4)
Moosp> (e r t)
(E R T)
Moosp> (2 . 3)
(2 . 3)
Moosp> (defun plus (a b) (+ a b))
(DEFUN PLUS (A B) (+ A B))

コード

package Moosp;

use Moose;
use Moosp::Env;
use Moosp::Reader;
use Term::ReadLine;

our $VERSION = 0.01;

sub run {
  my $self = shift;

  my $term = new Term::ReadLine 'Simple LISP REPL';
  my $prompt = "Moosp> ";
  my $OUT = $term->OUT || \*STDOUT;

  while ( defined ($_ = $term->readline($prompt)) ) {
    my $reader = Moosp::Reader->new();
    my $sexp = $reader->readFromString($_);
    warn $@ if $@;
    print $OUT $sexp->serialize(), "\n" unless $@;
  }

}

__PACKAGE__->meta->make_immutable;

no Moose;

1; # End of Moosp

moosp.pl

#!/usr/bin/env perl    
use lib "./lib";    
use Moosp;    
Moosp->new->run();

みつばつつじと蕎麦とケーキを求めて大淵に出かける

富士の大淵の花として有名らしい(が、U隊長の知り合いの富士市民はみんな聞いたこともないと言ってた)ミツバツツジを見に行きたいというので車で出かけた。正直僕は毎日見ているので見飽きた。

みつばつつじ

桜のように花が咲いた後に葉っぱがでるので、まとめて咲いてるとかなり奇麗。

1240316565 1240316572

きわだ路

気になっていた蕎麦屋。

1240316537 1240316548

中では農作業かなんかを終えたおじいちゃんが一人で焼酎やってた。のどかな感じ。蕎麦は山芋をつなぎに使っていて、のどごしというよりは噛み応えがある感じ。キョウザンボウの田舎を細くした感じか。辛汁もだしが効いていて好み。

1240316551

ワラビもつけてくれた。うまかった。

1240316555

うどんはのどごしが良くて、評判だったのと、さしみこんにゃくがおいしかったので帰りに買って帰った。

1240316541 1240316544

yamamoto

きわだ路の近くの大淵二小のそば。いい感じのたたずまい。

1240316526 1240316577

外に用意されているテラスみたいなとこで、のんびりできそう。

1240316534 1240316530

1240316562 1240316569

ちょっと甘めだけど、美味しかった。

ものまね鳥

翻訳なんてあったのか(絶版だけど)

ProductName 数学パズル ものまね鳥をまねる―愉快なパズルと結合子論理の夢の鳥物語
レイモンド スマリヤン
森北出版 / ?円 ( 1998-05-20 )


この際、洋書でもいいかなぁ。

ProductName To Mock a Mockingbird
Raymond M. Smullyan
Oxford University Press / 1512円 ( 2000-11-09 )


MooseX::Singletonの継承

MooseX::Singletonでuseしたクラスが継承している場合instanceで呼ばれたオブジェクトはスーパークラスのメソッドを呼べないという挙動ではまった。

package Foo;
use Moose;

sub p { return "XXX" }

package Sng;

use MooseX::Singleton;

extends 'Foo';

package main;

my $sng_new = Sng->new();
warn $sng_new->p();

my $sng_instance = Sng->instance;
warn $sng_instance->p();

実行

$ perl ms.pl 
XXX at ms.pl line 15.
Can't locate object method "instance" via package "Sng" at ms.pl line 17.

version

$ perl -MMooseX::Singleton\ 999
MooseX::Singleton version 999 required--this is only version 0.14.

WEB+DB PRESS Vol.50

予約した

ProductName WEB+DB PRESS Vol.50
WEB+DB PRESS編集部
技術評論社 / ¥ 1,554 ()
近日発売 予約可