String Perl

$name="Tom";
print "Hello, $name.\n";# $name and \n evaluated
print 'Hello, $name.\n';# String is literal; newline not interpreted
print "I don't care!\n";# \n is interpreted in double quotes
print 'I don\'t care!', "\n";# Backslash protects single quote in string "don\'t"