change log
Scrapbook : The Lisp Dictionary http://lispdoc.com/ ソースはどこかにないのかな?2006-02-22 (Wed) 19:37:55
RandomNote : NOT検索
適当にNOT検索ができるようにしてみる。
Rubyはまだよく分からんので変なことしているかも。
どなたかうまいこと実装してくれないかなぁ。
検索後が「-」で始まる場合はNOT検索をします。
----
--- index.rb.org 2006-02-19 06:35:28.630000000 -0500
+++ index.rb 2006-02-19 06:52:42.100000000 -0500
@@ -11,7 +11,7 @@
def initialize(word)
@word = word
- @qword = Regexp::quote(@word)
+ @qword = (@word.index("-") != 0) ? Regexp::quote(@word) : Regexp::quote(@word[1 .. -1])
@search_time = Time.now.to_i
@files = []
@count = 0
@@ -20,7 +20,11 @@
def make_files
Dir[CGI_frame::LEAFS_DIR + '*.txt'].each do |fname|
mes = File.open(fname) {|f| f.read}
- @files << fname if /#{@qword}/i =~ mes
+ if @word.index("-") != 0
+ @files << fname if /#{@qword}/i =~ mes
+ else
+ @files << fname unless /#{@qword}/i =~ mes
+ end
end
self
end
@@ -37,7 +41,7 @@
def check_text(fname)
mes = File.open(fname) {|f| f.read}
- if /#{@qword}/i =~ mes
+ if (@word.index("-") != 0 && /#{@qword}/i =~ mes)||(@word.index("-") == 0 && !(/#{@qword}/i =~ mes))
@files.unshift(fname).uniq!
else
@files.delete(fname) if @files.index(fname)
2006-02-19 (Sun) 21:41:33RandomNote : NOT検索
適当にNOT検索ができるようにしてみる。
Rubyはまだよく分からんので変なことしているかも。
どなたかうまいこと実装してくれないかなぁ。
--- index.rb.org 2006-02-19 06:35:28.630000000 -0500
+++ index.rb 2006-02-19 06:52:42.100000000 -0500
@@ -11,7 +11,7 @@
def initialize(word)
@word = word
- @qword = Regexp::quote(@word)
+ @qword = (@word.index("-") != 0) ? Regexp::quote(@word) : Regexp::quote(@word[1 .. -1])
@search_time = Time.now.to_i
@files = []
@count = 0
@@ -20,7 +20,11 @@
def make_files
Dir[CGI_frame::LEAFS_DIR + '*.txt'].each do |fname|
mes = File.open(fname) {|f| f.read}
- @files << fname if /#{@qword}/i =~ mes
+ if @word.index("-") != 0
+ @files << fname if /#{@qword}/i =~ mes
+ else
+ @files << fname unless /#{@qword}/i =~ mes
+ end
end
self
end
@@ -37,7 +41,7 @@
def check_text(fname)
mes = File.open(fname) {|f| f.read}
- if /#{@qword}/i =~ mes
+ if (@word.index("-") != 0 && /#{@qword}/i =~ mes)||(@word.index("-") == 0 && !(/#{@qword}/i =~ mes))
@files.unshift(fname).uniq!
else
@files.delete(fname) if @files.index(fname)
2006-02-19 (Sun) 21:24:25bookmark : 食玩問題 http://aquarius10.cse.kyutech.ac.jp/~otabe/shokugan/ 面白い問題。2006-02-16 (Thu) 13:00:01
bookmark : Native Win32 ports of some GNU utilities http://unxutils.sourceforge.net/ lsを打つ癖が直らないから入れておく2006-02-16 (Thu) 12:59:43
bookmark : Windows XP で w3m 0.5.1 をとりあえず動かす http://int.parfait.ne.jp/ols/w3monwin.html2006-02-16 (Thu) 12:59:22
bookmark : ttt: (VMware) FreeBSD 6.0-RELEASEのインストール http://nhh.mo-blog.jp/ttt/2005/11/vmware_freebsd__743b.html2006-02-16 (Thu) 12:59:08
bookmark : Internet Week 2005 チュートリアルプレゼンテーション資料 http://www.nic.ad.jp/ja/materials/iw/2005/proceedings/ 「安全なWebアプリ開発の鉄則2005」を読む。2006-02-16 (Thu) 12:58:50
bookmark : VMware設定マニュアル(FreeBSD4.4) http://info.choco-moco.net/vmware/2006-02-16 (Thu) 12:58:39
bookmark : 本当に無償で使える「VMware Player」 ― Weboo! Returns. http://yamashita.dyndns.org/blog/3432006-02-16 (Thu) 12:58:28
bookmark : 試験管のなかのコード :: VMWare Player にチャレンジ http://www.in-vitro.jp/blog/index.cgi/VMWare/20051104_01.html2006-02-16 (Thu) 12:58:17
bookmark : μ memo: VMware Playerのみで新しいVirtualMachineを構築する http://blog.yasaka.com/archives/2005/10/vmware_playervi.html2006-02-16 (Thu) 12:58:05
bookmark : 68user's page http://x68000.q-e-d.net/~68user/2006-02-16 (Thu) 12:57:54
bookmark : clmemo@aka: Firefox のブックマーク・ツールバーをファビコンでスマートに http://at-aka.blogspot.com/2006/01/firefox_25.html 要するにbookmarks.htmlの中に画像データが埋め込んである。2006-02-16 (Thu) 12:57:44
bookmark : 骨までしゃぶれiTSCOM「かっとび」 > コンピュータ > FreeBSD http://home.catv.ne.jp/dd/t_robot/computer/FreeBSD/index.html2006-02-16 (Thu) 12:57:33
Source of Nothingness
NANRI
NANRI