Quote with qq# (number sign)
#!/usr/bin/perl -w print qq#'"Hi," said Jack. "Have you read /. today?"'\n#;