#!/usr/bin/env ruby
require 'csv'

tp = 0
fp = 0
tn = 0
fn = 0
File.readlines(ARGV[0]).each do |line|
  pred = line.chomp.split(",").last
  case pred
  when "TP"
    tp+=1
  when "TN"
    tn+=1
  when "FP"
    fp+=1
  when "FN"
    fn+=1
  end
end
puts "#{tp},#{fp}\n#{fn},#{tn}"