my @got = $string_c =~ /^(?!\w)|(\.[^.]+)$/ig ? [] : split //, $string
+_c;