print OUT "$vard:$cnt{$vard}\n";