Perl みたいに

print qq|pg_query($db, "select * from where id = '666';");\n|;

と書けるようにしてほしい。