String Perl

print qq/\n/, q/I need $5.00/,"\n";