|
|
| 日 |
月 |
火 |
水 |
木 |
金 |
土 |
| 31 |
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 |
1 |
2 |
3 |
4 |
|
|---|
|
最新レス
|
・掃除機壊れた
└（キタ）11/26 17:14
・kindleキター
└（moon）05/25 00:13
・お釜
└（moon）04/05 19:56
・襲撃
└（moon）01/03 09:53
・襲撃
└（NOB）01/03 09:27
・のうしゃ！
└（よしお）04/05 22:29
・壊れた！！！
└（moon）12/10 22:59
・壊れた！！！
└（いた）12/10 06:04
・いろいろ購入
└（イタ）10/21 07:30
・ダウン
└（イタ）09/23 09:19
|
|
|
|
|
|
洗濯。
掃除。
布団を干す。
PC。
米を買う。
実家に行く。
帰る。
お風呂を洗う。
ちょっとPC。
お風呂を入れる。
ご飯の準備。
お風呂に入る。
ご飯を作る。
ご飯を食べる。
|
|
|
|
最近ゆびとまから、小学校時代の同級生から連絡が。
なつかしすぎ。
思わず当時の地図を広げて懐かしがってます。（脳内で）
そのうち会うかも。
| sasaking |
ゆびとま！
ずっとログインしてないけど、アカウント残ってるのかなぁ |
| 06/02/18 00:17:44 |
レスを書く
|
|
|
|
仕事場に行くと、急遽お客さんのところへ行くとのこと。
外でお昼を食べてお弁当はお持ち帰り。
で、今日気付いたのですが、仕事がカツカツ。
かなり余裕のないことに気付いた。
それを分かってるのか分かってないのか・・・？
とりあえずここ二ヶ月くらいは忙しくなりそうです。
最悪来月は残業、休日仕事かも。（そのくらいやばめ）
今月は急ぎ目の通常勤務で過ごすけど。
そんなときに限って違う仕事が入ったりするんだよなぁ。
（ほぼ違う仕事が確定してる。これに3日くらい取られそう）
そんなこと考えつつ、仕事場で日記を書く日々・・・
集中力が10時間も持つと思いますか？
最近はせいぜい朝の2,3時間で、休憩を挟んで、終わりの3､4時間。
このくらいが今の限界。
ってことは毎日最低でも3時間は遊んでいる計算に・・・（休憩含む）
|
|
|
|
昼間で寝てた。
で、この前ビデオに取った「みんなのいえ」（三谷幸喜作品）を見た。
その後ちょっとHP作るのを手伝っているひとから、掲示板の挙動がおかしいとメールされた。
見てみたら、なんと、掲示板のバグ・・・
いや、おいらが作った奴じゃなくて、フリーの掲示板を改造してたんですが。
明らかにバグ。。
直したけども。
|
|
|
|
マスクをして行ってみた。
せきはあんまりでないんだけどねー。
夜中まで起きてたらついつい映画を見て寝るのが4時半すぎてた・・・
|
|
|
|
風邪っぽい。
ここ最近のどが痛かったのですが、鼻が詰まるに変わりました。
そしてせきが出るに・・・
季節の変わり目ですかねぇ。。
|
|
|
|
Perlではtimelocalの関数が標準でついていないわけですよ。
（日時からUnixTimeへの変換）
localtimeならば標準なんですが。。。
（UnixTimeから日時への変換）
で、これを解消するために、ネットから検索して拾ってきたルーチンを使ってたわけですよ。
でも、これだとなぜか2006年の2月を指定すると正しい時間を取ってくれない・・・
# 簡易timelocal関数（日付=>秒数変換)
sub timelocal {
my($Sec, $Min, $Hour, $Date, $Mon, $Year) = @_;
my($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst);
my($cnt) = 0;
my($Now) = time;
while($cnt < 20) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
if ($year != $Year) {
$Now -= ($year - $Year) * 31536000;
} elsif ($mon != $Mon) {
$Now -= ($mon - $Mon) * 2592000;
} elsif ($date != $Date) {
$Now -= ($date - $Date) * 86400;
} elsif ($hour != $Hour) {
$Now -= ($hour - $Hour) * 3600;
} elsif ($min != $Min) {
$Now -= ($min - $Min) * 60;
} elsif ($sec != $Sec) {
$Now -= ($sec - $Sec);
} else {
last;
}
$cnt++;
}
$Now = 0 if $cnt == 20;
return $Now;
}
そんなわけなので、仕方なく自分で作りました。
処理がかなり冗長ですが、まぁ、そんなに気にしなくてはいけないとこには使ってないのでいいのですが。
とりあえずメモ的な日記と言うことで。
sub timelocal2 {
my($Sec, $Min, $Hour, $Date, $Mon, $Year) = @_;
my($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst);
my($Now) = time;
$cnt = 0;
my($cnt2) = 0;
while(1) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
$year+=1900;
if ($Year == $year) {
last;
} elsif($Year > $year) {
$Now += 60*60*24*350;
} else {
$Now -= 60*60*24*350;
}
$cnt++;
if ($cnt > 20) { $cnt2++; last; }
}
if (!$cnt2) {
# 月
my($cnt) = 0;
while(1) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
$mon++;
if ($Mon == $mon) {
last;
} elsif($Mon > $mon) {
$Now += 60*60*24*28;
} else {
$Now -= 60*60*24*28;
}
$cnt++;
if ($cnt > 15) { $cnt2++; last; }
}
}
if (!$cnt2) {
# DAY
my($cnt) = 0;
while(1) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
if ($Date == $date) {
last;
} elsif($Date > $date) {
$Now += 60*60*24*1;
} else {
$Now -= 60*60*24*1;
}
$cnt++;
if ($cnt > 31) { $cnt2++; last; }
}
}
if (!$cnt2) {
# Horu
my($cnt) = 0;
while(1) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
if ($Hour == $hour) {
last;
} elsif($Hour > $hour) {
$Now += 60*60*1;
} else {
$Now -= 60*60*1;
}
$cnt++;
if ($cnt > 24) { $cnt2++; last; }
}
}
if (!$cnt2) {
# Min
my($cnt) = 0;
while(1) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
if ($Min == $min) {
last;
} elsif($Min > $min) {
$Now += 60*1;
} else {
$Now -= 60*1;
}
$cnt++;
if ($cnt > 60) { $cnt2++; last; }
}
}
if (!$cnt2) {
# Sec
my($cnt) = 0;
while(1) {
($sec, $min, $hour, $date, $mon, $year, $day, $yday, $isdst) = localtime($Now);
if ($Sec == $sec) {
last;
} elsif($Sec > $sec) {
$Now += 1;
} else {
$Now -= 1;
}
$cnt++;
if ($cnt > 60) { $cnt2++; last; }
}
}
$Now = 0 if $cnt2;
return $Now;
}
|
|
|
|
おととい、会社からかえる途中、コンビニで流星軒のカップめんを発見！
（近くのおいしいラーメン屋）
買って帰って、翌日食す。
そしたら結構流星軒の味になってて驚いたよ。
スープはこんなかんじー。
でも、麺は別物な。
なんとなく近いけど。
チャーシューはぱさぱさしてた。
スープが結構近い味や香りだったので、結構な得点だとおもいます。
少なくとも、他の店を冠したカップめんよりもよさげ。
|
|
|
|
WEBで注文していたマザーボードが到着。
早速取り付ける。
そうしたらすんなり動いたぞー！
良かった良かった。
やっぱりマザーボードが壊れてたか。
でも、シリコングリスがなかったから、つけなかったんだけど、大丈夫かなぁ？（爆）
実家にはあったはずなんだけどもなぁ。。
で、マザーボードを変えてしまったので、WINXPがアクティベートしろと急かす。
最初は「３日以内にしろ」と言われてたのであとでーとやってなかったら、
どうやらシステムの時計が変わったしまったらしく、すぐにやれといわれる。
これをしないとログオフされるので実質使えないし。
しょうがないのでネットでアクティベートするか・・・
と思ってたら、ネットに繋がらないし。
何で繋がらないと言うと、無線LANでネットにつないでるんですが、
ログインしないと無線LANの設定ができないんですよ。
せめてこの設定さえさせてくれれば・・・
使えねぇ。マイクロソフト。
仕方なく電話でアクティベート。
自動応答で、何十文字ものIDを押して、その後何十文字ものアクティベートコードを打つ。
ちょーめんどい。
ネット接続ができればすぐなのに。。。
そうして使えるようになりました。
よかったよかった。
ちなみに、マザボがパワーアップしたので、機能的にもパワーアップしました。
フロントのUSBが２つ増えたりとか、S-ATAが使えるようになったとか（使わんけども）、KT266がKT400になったとか、メモリのデュアルチャンネルをサポートだとか。
でも、マザボ以外は従来のままなので、、、
よくよく考えると、HDD*4,CD-Rドライブ,DVD-RAMドライブ,プリンタ、スキャナなどなどをつけてるが、300W電源で足りるのだろうか？
まぁ、動いているから足りているのだろう・・・
|
|
|