"  Perl syntax.

syn clear Include Error
syn case match

syn match  MiscChar    "[^a-zA-Z0-9(){}$ ]"
syn match  NonMiscChar "[a-zA-Z0-9]"

syn match Error  /[A-Za-z]*[Ee][Rr][Rr][A-Za-z]\+/
syn keyword Error  exit try catch debug_print_backtrace debug_backtrace var_dump

"syn keyword Statement  return break continue
syn keyword Error  return break continue

syn match SpecialVar /\$\@<=\(GLOBALS\|_[A-Za-z]\+\)\>/

syn match  Comment     "^\s*\(#\|//\).*$"
syn region CommentMult start=+^\s*/\*+ end=+\*/+

"  Stupid signal-of-end-of-block comment!
syn match  CommentBlockSign  "\(}\s*\)\@<=\(#\|\/\/\).*$"

syn keyword Function  echo global array trim translate count
syn match   Function  /\c\<[a-z_]\+[a-z0-9_]\+\s*(\@=/
syn match   Concat  /[.]/

syn keyword  Statement  if else elseif each as list switch case function
syn keyword  Statement  for foreach do while
syn keyword  Statement  and or xor not

syn keyword Type  class
syn match   Type  /\<\(true\|false\|null\)\>/
syn match   Type  /\(\<return\s\+\)\@<=\([01]\>\|""\|''\)/

syn match Include /\<require\(_once\)\?\>/
syn match Include /\<include\(_path\)\?\>/

so $vim_cf/quoted.syn
syn region  Quoted  start=+<<<\z([_a-zA-Z][_a-zA-Z0-9]*\)$+  end=+^\z1;$+

let b:current_syntax = "php"