$text =~ /[^a-z0-9,]/i