「ぎょーむ日誌」目次に戻る | KuboWeb top に戻る | twilog | atom

ぎょーむ日誌 2003-04-(11-20)

苦情・お叱りは, たいへんお手数かけて恐縮ですが, 久保 (kubo@ees.hokudai.ac.jp) までお知らせください.

2003 年 04 月 11 日 (金)


2003 年 04 月 12 日 (土)


2003 年 04 月 13 日 (日)


2003 年 04 月 14 日 (月)


2003 年 04 月 15 日 (火)


2003 年 04 月 16 日 (水)

	package RedpineOpts;
	use strict;
	use Getopt::Long;

	sub new
	{
		my $class = shift;
		my $self = {};
		$self->{'parser'} = new Getopt::Long::Parser(
			config => ['pass_through']
		); # pass_through は複数の関数で引数処理するため必要
		$self->{'option'} = {};
		bless $self, $class
	}
	$self->{'parser'}->getoptions(
		'until=i' => \$option->{'end_age'},        # 整数
		'filter=s' => \$option->{'filter'},        # 文字列
		'stem_output' => \$option->{'stem_output'} # boolean
	);
	use sim_main;
	my $redpine_sim = new RedpineSim;
	$redpine_sim->Loop;

2003 年 04 月 17 日 (木)


2003 年 04 月 18 日 (金)

R kaigo
[R の介護?]
京王線車両内の吊り広告だそうで. 撮影者は 都立大植物生態 の可知さん, なのでした. はい, 統計学ソフトウェアとは何の関係もありません.


2003 年 04 月 19 日 (土)


2003 年 04 月 20 日 (日)


KuboLog | KuboWeb