#!/usr/bin/perl -w $var = qq("Double-quoted string."); print "$var\n"; $var = qq~String with "double" and 'single' quotes~; print "$var\n";