if ($_ = /([A|a])/) {