options = bp.parse(ARGV, casts)
bp.each_record do |record|
- record["SEQ"].swapcase! if record.has_key? "SEQ"
+ record[:SEQ].swapcase! if record.has_key? :SEQ
bp.puts record
end
@in.each_line do |line|
case line
when /^([^:]+): (.*)$/
- record[$1] = $2
+ record[$1.to_sym] = $2
when /^---$/
yield record unless record.empty?
record = {}
@out = Stream::open(@options, mode="w", @output) unless @out.is_a? IO
record.each do |key,value|
- @out.print "#{key}: #{value}\n"
+ @out.print "#{key.to_s}: #{value}\n"
end
@out.print "---\n"