Or as oneliner

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