my ($o, $q, $c, $u) = (split /\n|(?: : )/, $_)[1,3,5,7];