VB.NETのタグファイルを作るスクリプト

vbtags.rb

#!/usr/local/bin/ruby
# Ref: http://homepage1.nifty.com/markey/memo/200406.html

tags = []
ARGF.each_line do |line|
  ARGF.skip if /tags/i =~ ARGF.filename
  if /(Sub|Function|Const|Property)\s+([^\s]+)\s*(\(|=)/ =~ line
    tags.push "#{$2}\t#{ARGF.filename}\t/^#{line.chomp}$/;\"\tf"
  end
  if /Class/ =~ line && /End Class/ !~ line
    tags.push "#{$2}\t#{ARGF.filename}\t/^#{line.chomp}$/;\"\tf"
  end
end
puts tags.sort