Perl quoting issue in CGI script (MySQL program)

programming
1

Hi,
I have this line in my CGI Perl script:

$sth=$dbh->prepare (qq {INSERT INTO reviews VALUES (’$ary[0]’,’$reviewername’,’$topic’,’$review’,‘DATE_FORMAT(CURDATE(),"%D %M, %Y"’) } ) ;

, but I keep getting “0000-00-00” in the “date” field in the database. How must I quote it so that the ‘DATE_FORMAT’ part is interpolated?

Thanks.