stk_ts_seq.rb: 0.1.0

#!/bin/ruby

# No warranty.
# Be careful to use.

# Filename : stk_ts_seq.rb
# Author   : sak (http://sak.que.jp)
# Revision : 0.1.0
# Date     : Fri Apr 09 20:11:44 JST 2004
# Require  : Ruby

# Example of usage:
# ruby stk_ts_seq.rb < infile.stk > outfile.stk

timestamp = Time.now
stat = nil
while gets do
        if $_ =~ /^@$/ && !stat
                stat = true
        elsif $_ =~ /^\d{4}\/\d{2}\/\d{2}\(\d{2}:\d{2}:\d{2}\)$/ && stat
                puts '@'
                puts timestamp.strftime("%Y/%m/%d(%H:%M:%S)")
                timestamp += 1
                stat = nil
                sleep(1)
        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:20)