my %nodups = %{{map{ split /\./ , $_ , 2;  } @values}};