---8<-------8<-------8<-------8<-------
シェル・スクリプト wgrep (sed)
#!/bin/sh
# wgrep
exec grep $@ | sed 's/^\([^:]*\):\(.*\)$/\1<\/a>
\2
/' | w3m -T text/html
シェル・スクリプト wlocate (sed)
#!/bin/sh
# wlocate
exec locate $@ | sed 's/^.*$/&<\/a>
/' | w3m -T text/html
---8<-------8<-------8<-------8<-------
シェル・スクリプト wgrep (ruby)
#!/bin/sh
# wgrep
exec grep $@ | lf.rb | w3m -T text/html
ruby スクリプト lf.rb
#!/usr/bin/env ruby
while gets()
print "#{$1}
\n#{$2}
\n" if ~/^([^:]+):(.*)/
end
---8<-------8<-------8<-------8<-------
シェル・スクリプト wlocate (ruby)
#!/bin/sh
# wlocate
exec locate $@ | locf.rb | w3m -T text/html
ruby スクリプト locf.rb
#!/usr/bin/env ruby
while gets()
$_.chop!
print "#{$_}
\n"
end
---8<-------8<-------8<-------8<-------