missing last character in perl regex

Question

(log doggies) (log needs)

^\\(log (.*)[^)]\\)\\s*\\(log (.*)[^)]\\)$

It works with the exception of missing character at the end \"s\" as:

Answer 1

^\(log (.*)\)\s*\(log (.*)\)$

You don't need to negate the ).