PIAS fast-forward

pias-ff.rb

require 'json'

def replace_json(node, &replacement_action)
  case node
  when Hash
    node.each_value do |item|
      yield item
      replace_json(item, &replacement_action)
    end
  when Array
    node.each do |item|
      yield item
      replace_json(item, &replacement_action)
    end
  end
end

if STDIN.tty?
  puts 'cat pias-input.json | #{$0} > pias-output.json'
else
  data = JSON.parse(STDIN.read)
  replace_json(data) do |node|
    if node.is_a? Hash
      if duration = node["duration"]
        node["duration"] = duration / 10
      end
    end
  end
  puts JSON.pretty_generate(data)
end