stk_commentify.rb: 0.1.1

#!/bin/ruby

# No warranty.
# Be careful to use.

# Filename : stk_commentify.rb
# Author   : sak (http://sak.que.jp/)
# Revision : 0.1.1
# Date     : Fri Apr 09 20:21:20 JST 2004
# Require  : Ruby

# Change log:
# 0.1.0 : Mon Mar 29 07:16:48 JST 2004

while gets do
        if $_ =~ /^@$/
                stat = true
        elsif $_ =~ /^\d{4}\/\d{2}\/\d{2}\(\d{2}:\d{2}:\d{2}\)$/ && stat
                puts '> @'
                puts '> ' + $_
                stat = nil
        elsif $_ =~ /^\d{4}\/\d{2}\/\d{2}\(\d{2}:\d{2}:\d{2}\)[題]:.*$/ && stat
                puts '> @'
                puts '> ' + $_
                stat = nil
        elsif $_ !~ /^\d{4}\/\d{2}\/\d{2}\(\d{2}:\d{2}:\d{2}\)$/ && stat
                puts '@'
                puts $_
                stat = nil
        elsif $_ !~ /^\d{4}\/\d{2}\/\d{2}\(\d{2}:\d{2}:\d{2}\)[題]:.*$/ && stat
                puts '@'
                puts $_
                stat = nil
        else
                puts $_
                stat = nil
        end
end

2004/04/11(23:58:18)