わいえむねっと

2026/11
1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30

2007/08/02 Thu: スキルシートのセールスポイントを空欄にして提出したら埋めて出せと突っ返されたのでセールスポイントなんかねぇよとぼやいていたところ前方から

「ツンデレ」

との助言。
いや、だから。それは。

Effective Perlのandとorのくだりで

これらと同時に、それほどうれしくないnotと、ほとんど使いみちのないxorも追加された

とか言われているnotとxorのテストコードをだらだらと。

2007/08/01 Wed: レビューがすんなり終わると拍子抜けというか物足りないというか。
8月ですね。
小坂那也です。（挨拶）
脈絡なんかない。

スカイブルー。
もしくはレイニーブルー。

2007/07/31 Tue: 疲労困憊ル。

そして今日は日本酒入りウエハースとか。

唐突に先輩から「理解した」と言われてツンデレにカテゴライズされました。
脈絡がないにもほどが！
仕事中はツンツン、居酒屋ではデレデレとかなんとか。
いや、デレデレというか。それは。

そして今日も刺身を買って帰る。
そして今日は冷やで飲む。
そして今日で四合摂取完了。

2007/07/30 Mon: 暑くて3時に目が覚める。
二度寝する気も起きずにそのまま過ごして6時30分に出発。
マックでコーヒーをすすったりなんだりで時間をつぶして8時に出社。
今日も適当にいこう。

唐突に新潟土産とかで日本酒をいただきました。
ディスプレイの片隅に置いたまま仕事を。

無糖ブラックは3本。
樽型。

日本酒には魚かなーと。
帰り際にスーパーに立ち寄り、刺身を買って帰る。
最近はウイスキーばかり飲んでいたのでたまには日本酒もいいものですねとくいくいと。
なんとなくラベルをぐるりと眺めてみたら、

冷や、又は少し冷して御賞味下さい。

との記述。
もう常温で半分飲んでしまったよ！
残りは明日冷やで飲もうそうしよう。

2007/07/29 Sun

雷雨ですね。 Perl覚え書き。

open INPUT, 'foo.txt' or die;
open OUTPUT, '>bar.txt' or die;
do{print OUTPUT "[$1]\nfoo=$2\nbar=$3\n" if /(\w+),(\w+),(\w+)/} while <INPUT>;

あるファイルの特定行から情報を抽出して別フォーマットのファイルを生成。

open INPUT, 'foo.txt' or die;
open OUTPUT, '>bar.txt' or die;
do{do{print OUTPUT <<HERE;
[$1]
foo=$2
bar=$3
HERE
} if /(\w+),(\w+),(\w+)/} while <INPUT>;

ヒアドキュメントにしてみたり、

open INPUT, 'foo.txt' or die;
open OUTPUT, '>bar.txt' or die;
do{sub{print OUTPUT <<HERE;
[$1]
foo=$2
bar=$3
HERE
}->() if /(\w+),(\w+),(\w+)/} while <INPUT>;

コードリファレンス即デリファレンスでdoネストを回避してみたり。（大して変わらねぇ）雨もやんで薬局。そしてまた雷雨。 Memo:

http://dslinux.org/wiki/DSLinux_as_Terminal
DSLinux as Terminal

2007/07/28 Sat: 例によって朝まで起きていて気が付いたら寝ていて起きたら昼過ぎで。

マカダミアナッツをぽりぽりかじりながら死んだ目。

2007/07/27 Fri: そういえば給与明細を開封していなかったと開封してみたところなんだかいやに住民税が上がっている気がして今年度分の給与明細を引っ張り出してきたみたところやっぱり先月から8kほど上がっているようなそんなような。
8kって1年で諭吉10人分てことですか。
アホか！

そうですね。
君はマルチスレッドであるということにもう少し注意を払ってコードを書いたほうがいいと思います。

2007/07/26 Thu: Referer:
http://www.google.co.jp/search?hl=ja&rlz=1B2GGGL_jaJP207JP207&q=doxygen+javadoc+%E4%BB%95%E6%A7%98%E6%9B%B8%E5%B7%A5%E6%88%BF&btnG=%E6%A4%9C%E7%B4%A2&lr=
doxygenについては

クラス、構造体、共用体、インタフェースの説明です。

とか、全部まとめられてしまうところがどうにかならないものかとか。

さぁ、楽しくなってまいりました！
楽しくなって参りました！
楽しくないです参りました！
ひどい焦燥感。

そんなこんなでとっておきの古酒をあおって。

2007/07/25 Wed: 今日も今日とて朝から肉まんを食そうと駅までの道すがらコンビニに立ち寄ろうとしたところ肉まんが見当たらないというかどうもあんまんとピザまんしかないようだったのでそのまま店に入りもせずにすたとすたと駅まで。

そうですね。
そもそも性質に難が。

2007/07/24 Tue

今日の日付は数字の並び的にどうも、なにか、こう、しっくりするものがあると思ったら誕生日だったわけですが、それはそれとして。いつもと変わらず肉まんをかじりながらてくてく駅へと。 Perl覚え書き。
マッチ数について考えてみる。

$_ = "fooFooFOO";
print /foo/gi;                      # fooFooFOO

リストコンテキストだとマッチ文字列。

$_ = "fooFooFOO";
print scalar /foo/gi;               # 1

スカラコンテキストだとマッチ結果。

$_ = "fooFooFOO";
@foo = /foo/gi;
print @foo;                         # fooFooFOO
print $#foo;                        # 2
print scalar @foo;                  # 3

配列をスカラコンテキストとして評価すればマッチ数。
一時変数を省略するにはscalarのリストコンテキスト版が欲しいところだけれど、ないらしい。

$_ = "fooFooFOO";
print scalar map 0, /foo/gi;        # 3
print scalar map //, /foo/gi;       # 3
print scalar map '', /foo/gi;       # 3
print scalar map undef, /foo/gi;    # 3
print scalar map{0} /foo/gi;        # 3
print scalar map{//} /foo/gi;       # 3

ので、mapで代用してみたりとか。

$_ = "foobar";
s/(\w)(o*)(\w*)/"$1o*".(scalar map 0, $2=~\/o\/g).$3/eg;
print;                              # fo*2

でも、置換でマッチ数を使用しようとすると途中でメモリ変数がクリアされてしまったりとか。

$_ = "foobar";
s/(\w)(o*)(\w*)/"$1o*".do{scalar map 0, $2=~\/o\/g;}.$3/eg;
print;                              # fo*2bar

ので、doを使ってスコープをずらしたりとか。 overflow:autoの使用回数が増えてきたのでとりあえず変換対応してみたりなんだり。