perl -lne '$h{$1}++ if /^((?:\d+\.)+\d+)/; END{ print "$_ was seen $h{$_} times" for (sort keys %h)}' d:\temp\file.csv