---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<-------