「勝手に国別ランキング-2008年」 2008/10/31
「勝手に一人当たりGDP国別ランキング-2008年」 2008/11/30
「国別ランキング」をキーにして検索してみた。
・google 1ページの8番目 勝手に一人当たりGDP国別ランキング
3ページの30番目 勝手に国別ランキング
・@nifty 1ページの9番目 勝手に一人当たりGDP国別ランキング
3ページの30番目 勝手に国別ランキング
・biglobe 2ページの11番目 勝手に一人当たりGDP国別ランキング
・goo 2ページの11番目 勝手に一人当たりGDP国別ランキング
・msn 2ページの15番目 勝手に一人当たりGDP国別ランキング
・livedoor 2ページの17番目 勝手に一人当たりGDP国別ランキング
・フレッシュアイ 5ページの50番目 勝手に一人当たりGDP国別ランキング
・Yahoo! 6ページの55番目 勝手に一人当たりGDP国別ランキング
・excite 6ページの59番目 勝手に一人当たりGDP国別ランキング
・mooter ?
・infoseek ?
・百度 ?
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
じじぃの日記、「勝手に国別ランキング-2008年」は「勝手に一人当たりGDP国別ランキング-2008年」の約1ヵ月前に書いたものだ。
だけど、ヒット率では「勝手に一人当たりGDP国別ランキング-2008年」が圧倒的に多い。
勝手に一人当たりはそれだけ、見た人がリンクをはっているということか。
自分のパソコンでほとんど検索エンジン「google」を使っている。
予想では「google」でのヒットがほとんどだろうと思っていたが、検索結果で見ると「google」と「@nifty」は似ている。
もしかして、「@nifty」= 「google」だったりして。
「goo」の検索エンジンに「google」のエンジンの一部が利用されていると言われているが検索結果からは?だ。
mooterで「老兵は黙って」をキーにして検索すると検索結果「老兵は黙って去りゆくのみ」が6ページ(60件)まで延々続くが「国別ランキング」でやるとひっかからない。
mooterは曖昧検索が苦手なのだろうか。
検索結果から見ると、あまり知られていない検索エンジンはそれなりにということか。
「google」が出る前は「infoseek」を使っていたんだけどなぁ。
話変わって
rubyで簡易HEX(16進)ダンプのプログラムを作ってみた。
改行コードはCR+LFとして処理しています。
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
読み込むファイル (perldata.txt)
# perl filelist.pl
my @files = glob('obaka/*.*');
foreach my $file (@files) {
print "$file\n";
}
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
・ruby (hexconv.rb)
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
#infile = open("perldata.txt")
infile = open(ARGV[0])
i = 0
while c = infile.read(1)
a = c.unpack("H2")
#s = a.swapcase
s = a[0]
if i == 0
hx = s
s2 = " " + c
i += 1
else
i += 1
if c != "\n"
hx = hx + s
s2 = s2 + c
else
hx = hx + "0D"
s2 = s2 + '.'
end
if (i % 16) == 0
hx = hx + s2 + "\n"
s2 = " "
end
if c == "\n"
hx = hx + "0A"
s2 = s2 + '.'
i += 1
if (i % 16) == 0
hx = hx + s2 + "\n"
s2 = " "
end
end
end
end
len = (16 - s2.length)*2+1
while len > 0
hx = hx + " "
len -= 1
end
hx = hx + " " + s2
print hx, "\n"
infile.close
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- -
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
実行結果
C:\test>ruby hexconv.rb perldata.txt
23207065726c2066696c656c6973742e # perl filelist.
706c0D0A6d79204066696c6573203d20 pl..my @files =
676c6f6228276f62616b612f2a2e2a27 glob('obaka/*.*'
293b0D0A666f7265616368206d792024 );..foreach my $
66696c6520284066696c657329207b0D file (@files) {.
0A20207072696e7420222466696c655c . print "$file\
6e223b0D0A7d0D0A n";..}..