传闻伟大的长城将一系列国外网站集体屏蔽:bing, twitter, flikr等等,使得中国的互联网成为名副其实的局域网,sigh……回忆起当年我出国申请的时候也是好多国外网站被屏蔽,还要找师兄帮忙把Duke网页打包下载发给我的经历。叹息政府对舆论控制的力度,以及手段之粗陋。同样是为政体或者大集团服务的媒体,怎么国外的愚昧了民众之后还要被民众表扬说自由无偏见;而国内的非得暴力打击引起公愤而不懂得分流制洪呢?
Tuesday, June 2, 2009
六月二日屏蔽日
传闻伟大的长城将一系列国外网站集体屏蔽:bing, twitter, flikr等等,使得中国的互联网成为名副其实的局域网,sigh……回忆起当年我出国申请的时候也是好多国外网站被屏蔽,还要找师兄帮忙把Duke网页打包下载发给我的经历。叹息政府对舆论控制的力度,以及手段之粗陋。同样是为政体或者大集团服务的媒体,怎么国外的愚昧了民众之后还要被民众表扬说自由无偏见;而国内的非得暴力打击引起公愤而不懂得分流制洪呢?
Monday, May 4, 2009
Selecting N random lines from a file
#!/usr/bin/perl -w
die "Usage: $0 [N] [FileName], where N is the number of lines to pick\n"
if @ARGV < 1;
$N = shift @ARGV;
@pick = ();
while (<>) {
if (@pick < $N) {
push @pick, $_;
($r1, $r2) = (rand(@pick), rand(@pick));
($pick[$r1], $pick[$r2]) = ($pick[$r2], $pick[$r1]);
} else {
rand($.) <= $N and $pick[rand(@pick)] = $_;
}
}
print @pick;
die "Usage: $0 [N] [FileName], where N is the number of lines to pick\n"
if @ARGV < 1;
$N = shift @ARGV;
@pick = ();
while (<>) {
if (@pick < $N) {
push @pick, $_;
($r1, $r2) = (rand(@pick), rand(@pick));
($pick[$r1], $pick[$r2]) = ($pick[$r2], $pick[$r1]);
} else {
rand($.) <= $N and $pick[rand(@pick)] = $_;
}
}
print @pick;
Tuesday, April 28, 2009
Sunday, April 26, 2009
猪流感
乍一听还以为是禽流感,原来是swine flu不是swan flu的啊。继墨西哥四月十三以来病1400死86,美国也已经有五个州20人受到感染,并于今天宣布进入疾病紧急状态。这家伙1918年发过一次,1976年发过一次,今年又来了,大家小心点。做个小FAQ:
- 得病症状:发烧头痛和普通感冒一样,总之就是看不出来,只有去医院测一下才知道。
- 传染模式:吃猪肉是没有问题的,猪流感只会在和得病的猪(或者人)接触之后传染。美国天南海北这些个例都是最近去了墨西哥的。
- 疫苗治疗:目前没有猪流感疫苗,正在开发中。今年打过流感疫苗的人对此也不免疫,不过得了猪流感还是有些药物可以治疗。
Wednesday, April 22, 2009
广告效应
查韦斯送了奥巴马一本书直接导致此书在Amazon的排名从四位数在24小时之内飙升至一位数(现在是两位数了);Oprah在她的电视节目中吹捧了一下twitter导致了一个周末产生了超过一百万个新twitter用户注册。不可否认,名人有名人效应,而往往初衷不是广告的事件造成的广告效应比所谓的广告还要大。若是平庸大众想造点轰动效应,估计只能走反面极端去造些恶意负面新闻,就像Domino这个鼻涕丑闻估计害得无穷人N久不敢踏进他家店子。
Subscribe to:
Posts (Atom)