2007年05月31日

久しぶりに Perl の Programming

ちょっとした検証用で小さい Program を組んでみた。

#!/usr/bin/perl -w
use strict;

my $file = shift(@ARGV);
my $minus_file = shift(@ARGV);

open(FH ,$file) || die("Can't open file: $!\n");
my $csv;
chop(@$csv = );
close(FH);

open(FH ,$minus_file) || die("Can't open file: $!\n");
my $minus_csv;
chop(@$minus_csv = );
close(FH);

my $hash;

for(@$csv){
if(exists($hash->{$_})){
print('<' . $_ . "\n");
}
else{
$hash->{$_} = 1;
}
}

my $minus_hash;

for(@$minus_csv){
if(exists($minus_hash->{$_})){
print('>' . $_ . "\n");
}
else{
$minus_hash->{$_} = 1;
}
}

for(sort(keys(%$hash))){
if(exists($minus_hash->{$_})){
delete($minus_hash->{$_});
next();
}

print('+' . $_ . "\n");
}

for(sort(keys(%$minus_hash))){
print('-' . $_ . "\n");
}

続きを読む
posted by mimic28号 at 18:45| 東京 ☀| Comment(0) | TrackBack(0) | 密かな楽しみ | このブログの読者になる | 更新情報をチェックする

2007年05月30日

周期

最近は水曜日に疲れてる!?(水曜日に疲れの限界が来る。)
続きを読む
posted by mimic28号 at 23:55| 東京 ☀| Comment(0) | TrackBack(0) | 密かな楽しみ | このブログの読者になる | 更新情報をチェックする

2007年05月29日

考える

考える事が好き何だと、気が付いた。
続きを読む
posted by mimic28号 at 23:55| 東京 ☀| Comment(0) | TrackBack(0) | 密かな楽しみ | このブログの読者になる | 更新情報をチェックする

2007年05月28日

PV の数が異常!?

昨日の PV の数が異常に多い。
続きを読む
posted by mimic28号 at 00:30| 東京 ☀| Comment(0) | TrackBack(0) | 密かな楽しみ | このブログの読者になる | 更新情報をチェックする

2007年05月27日

東京大学に行って講義に参加

東京大学で五月祭と言う学園祭が行われていたので行って来ました。
http://www.a103.net/may/80/visitor/
http://www.a103.net/may/80/visitor/cent_lec.html
続きを読む
posted by mimic28号 at 23:00| 東京 ☀| Comment(0) | TrackBack(0) | 企画 | このブログの読者になる | 更新情報をチェックする

2007年05月26日

昼寝

眠気に逆らわず。
続きを読む
posted by mimic28号 at 23:55| 東京 ☀| Comment(0) | TrackBack(0) | お知らせ | このブログの読者になる | 更新情報をチェックする

2007年05月25日

記憶に余り残らない1日

そんな日って
続きを読む
posted by mimic28号 at 23:55| 東京 ☀| Comment(0) | TrackBack(0) | 日常の一小間 | このブログの読者になる | 更新情報をチェックする

2007年05月24日

あ〜あ

最近始めて知ったんだけど。
こんな病気があるって
http://d.hatena.ne.jp/keyword/%c3%e6%c6%f3%c9%c2
続きを読む
posted by mimic28号 at 23:55| 東京 ☀| Comment(4) | TrackBack(0) | お知らせ | このブログの読者になる | 更新情報をチェックする

2007年05月23日

ねた

今さっき睡魔に負けて寝た。
昔は、損したと思ってたけど、少し考えが変わって来た。
寝ないといけない時もある。
続きを読む
posted by mimic28号 at 23:55| 東京 ☀| Comment(0) | TrackBack(0) | 密かな楽しみ | このブログの読者になる | 更新情報をチェックする

2007年05月22日

この時期にはまってはいけない

う〜ん、はまってはいけないものにはまりそうだ。(はっきりは言えない。凄い抽象的。知り合いにちょこっとちょっかいを出してしまう事。結構はっきりしてるか。)
時間が無くなって行く気がしているのに。

仕事が疎かになってしまいかねないのではまってはいけない。

そうか、そうかも。寂しいだ……。
そんな人だったのかと、気が付く。(書いておいて、より寂しさが、泣いたりはしてませんよ。)

慣れるまでが長い人なんで〜〜。(聞いちゃぁぁおらん!!てか。知らんし。って自己突っ込み。)
慣れたら、あれなんだけどな〜。

mimic28号でした。
posted by mimic28号 at 23:55| 東京 ☀| Comment(0) | TrackBack(0) | 人格 | このブログの読者になる | 更新情報をチェックする

2007年05月21日

ある店の食べ物

う〜ん。
続きを読む
posted by mimic28号 at 12:30| 東京 ☀| Comment(0) | TrackBack(1) | お知らせ | このブログの読者になる | 更新情報をチェックする

2007年05月20日

秋葉原に焼肉を食べにそして……

秋葉原なのに?
焼肉?
とお思いでしょうが。
大都市なので大丈夫だと思います。
大都市ってのは、食べ物も、何でもかんでも。
続きを読む
posted by mimic28号 at 03:00| 東京 ☀| Comment(0) | TrackBack(0) | Entertainment | このブログの読者になる | 更新情報をチェックする

2007年05月19日

汚い話

食事中の方は続きを読まない方が良いと思います。

さっき、お風呂に入りました。
なるほど、体の神秘?
続きを読む
posted by mimic28号 at 15:00| 東京 ☀| Comment(0) | TrackBack(0) | お知らせ | このブログの読者になる | 更新情報をチェックする

2007年05月18日

話題に乗って BIG を購入

eBANK に Yahoo! Research から 1500円位もらっていたので
良い機会なので使ってみた。
続きを読む
posted by mimic28号 at 00:00| 東京 ☀| Comment(0) | TrackBack(0) | Money | このブログの読者になる | 更新情報をチェックする

2007年05月17日

すかっ!!

すかっ!!とする事何か無いかな。
続きを読む
posted by mimic28号 at 22:30| 東京 🌁| Comment(0) | TrackBack(0) | 密かな楽しみ | このブログの読者になる | 更新情報をチェックする

2007年05月16日

体調が悪くなる時期なのかな

身の回りの人々も体調不良
続きを読む
posted by mimic28号 at 23:55| 東京 ☔| Comment(0) | TrackBack(0) | 日常の一小間 | このブログの読者になる | 更新情報をチェックする

2007年05月15日

色々悩む

内(心)なる事なので
続きを読む
posted by mimic28号 at 23:55| 東京 ☔| Comment(0) | TrackBack(0) | 人格 | このブログの読者になる | 更新情報をチェックする

2007年05月14日

弱くなったな〜

今日もあんまり体の調子がよろしく無い。
続きを読む
posted by mimic28号 at 23:55| 東京 ☔| Comment(0) | TrackBack(0) | お知らせ | このブログの読者になる | 更新情報をチェックする

2007年05月13日

体が…

ちょっとうろちょろしただけで。
続きを読む
posted by mimic28号 at 10:00| 東京 ☀| Comment(0) | TrackBack(0) | Passion | このブログの読者になる | 更新情報をチェックする
×

この広告は1年以上新しい記事の投稿がないブログに表示されております。