$c = () = $a =~ /\./g