わいえむねっと

2007/04
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/04/20 Fri

豚角煮まんだよ全員集合。新人教育の手伝いで課題の採点を一日中。
なんつーか、ひどいな。
完了判断を自己判断としていたらしいけど、駄目だろそれ。 Perl覚え書き。
backticksは出力が完了してから制御を戻すので、

open FILE, '>foo.txt';
print FILE `foo`;
close FILE;

とかすると、制御が戻ってきてから一括出力。
随時出力するには、

open STDOUT, '>foo.txt';
system 'foo';
close STDOUT;

とかして、標準出力をファイルリダイレクトに置き換えてsystemで実行。
標準出力を再使用したい場合は要退避。

open _STDOUT, '>&STDOUT';
open STDOUT, '>foo.txt';
system 'foo';
close STDOUT;
open STDOUT, '>&_STDOUT';
print 'bar';

無糖ブラックは3本。別プロジェクトに抜かれることになった後輩と二人して飲みに行く。
壁にずらりと逆さ固定された焼酎が、どれでも一杯300円。店員に声をかけてセルフサービス。
こんな店が会社の近所にあったのか！
片っ端から飲み続けて4時間。
カウンタ裏に森伊蔵が置いてあったので「あれは？」と聞いたら「時期を見て」との返答。
ふむ。