       expect(tokens[5]).toEqual value: ";", scopes: ["source.perl"]
 
   describe "tokenizes word quoting", ->
-    it "qw(word)", ->
+    it "quotes words", ->
       {tokens} = grammar.tokenizeLine("qw(Aword Bword Cword);")
       expect(tokens[0]).toEqual value: "qw(", scopes: ["source.perl", "string.quoted.other.q-paren.perl", "punctuation.definition.string.begin.perl"]
       expect(tokens[1]).toEqual value: "Aword Bword Cword", scopes: ["source.perl", "string.quoted.other.q-paren.perl"]

      expect(lines[4][0]).toEqual value: ")", scopes: ["source.perl", "string.quoted.other.q-paren.perl", "punctuation.definition.string.end.perl"]
      expect(lines[4][1]).toEqual value: ";", scopes: ["source.perl"]

    it "q~multiline text~", ->
      lines = grammar.tokenizeLines("""q~
      This is my first line\\n
      and this the second one)\\x00

      expect(lines[2][0]).toEqual value: "}};", scopes: ["source.perl"]

  describe "tokenizes format", ->
    it "works as expected", ->
      lines = grammar.tokenizeLines("""format STDOUT_TOP =
                     Passwd File
Name                Login    Office   Uid   Gid Home
