$a = 'test'; print('$a\n'); # prints: $a\n print("$a\n"); # prints: test and a newline print("\$a\n"); # prints: $a and a newline @a = qw( a b c ); print('@a\n'); # prints: @a\n print("@a\n"); # prints: abc and a newline print("\@a\n"); # prints: @a and a newline