// JavaScript Document

var PerlSyntax=
{
	'COLOR1':[
		'if',
		'else',
		'elsif',
		'while',
		'for',
		'do',
		'until',
		'foreach',
		'unless',
		'switch',
		'case',
		'break',
		'default',
		'class'
	],
	'COLOR3':[
		'require_once',
		'print_r',
		'print',
		'new',
	],
	'COLOR4':['\\.'],
	'COLOR2':['%','@','+','-','=','[',']','{','}','(',')',':',',','<','~','>','&amp;','*','/','!','?'],
	/*'COLOR3':[
		'$ARG',
		'$_',
		'$a',
		'$b',
		'$&',
		'$`',
		'$’',
		'$\\+',
		'@\\+',
		'$\\*',
		'$\\.',
		'$RS', 
		'$\\/',
		'$\\|',
		'$,',
		'$ORS',
		'$\\',
		'$"',
		'$;',
		'$#',
		'$%',
		'$=',
		'$-',
		'@-',
		'$~',
		'$^',
		'$:',
		'$^L',
		'$^A',
		'$?',
		'$!',
		'%!',
		'$^E',
		'$@',
		'$$',
		'$<',
		'$>',
		//'$\\(',
		//'$\\)',
		'$0',
		'$\\[',
		'$\\]',
		'$^C',
		'$^D',
		'$^F',
		'$^H',
		'%^H',
		'$^I',
		'$^M',
		'$^O',
		'$^P',
		'$^R',
		'$^S',
		'$^T',
		'$^V',
		'$^W',
		'$^X',
		'ARGV',
		'$ARGV',
		'@ARGV',
		'ARGVOUT',
		'@F',
		'@INC',
		'@_',
		'%INC',
		'%ENV',
		'$ENV',
		'%SIG',
		'$SIG'
	],
	'COLOR3':[
		'chomp',
		'chop',
		'chr',
		'crypt',
		'hex',
		'index',
		'lc',
		'lcfirst',
		'length',
		'oct',
		'ord',
		'pack',
		'reverse',
		'rindex',
		'sprintf',
		'substr',
		'uc',
		'ucfirst',
		'pos',
		'quotemeta',
		'split',
		'study',
		'abs',
		'atan2',
		'cos',
		'exp',
		'hex',
		'int',
		'log',
		'oct',
		'rand',
		'sin',
		'sqrt',
		'srand',
		'pop',
		'push',
		'shift',
		'splice',
		'unshift',
		'grep',
		'join',
		'map',
		'reverse',
		'sort',
		'unpack',
		'delete',
		'each',
		'exists',
		'keys',
		'values',
		'binmode',
		'close',
		'closedir',
		'dbmclose',
		'dbmopen',
		'die',
		'eof',
		'fileno',
		'flock',
		'format',
		'getc',
		'print',
		'printf',
		'read',
		'readdir',
		'rewinddir',
		'seek',
		'seekdir',
		'select',
		'syscall',
		'sysread',
		'sysseek',
		'syswrite',
		'tell',
		'telldir',
		'truncate',
		'warn',
		'write',
		'pack',
		'read',
		'syscall',
		'sysread',
		'syswrite',
		'unpack',
		'vec',
		'-X',
		'chdir',
		'chmod',
		'chown',
		'chroot',
		'fcntl',
		'glob',
		'ioctl',
		'link',
		'lstat',
		'mkdir',
		'open',
		'opendir',
		'readlink',
		'rename',
		'rmdir',
		'stat',
		'symlink',
		'sysopen',
		'umask',
		'unlink',
		'utime',
		'caller',
		'continue',
		'die',
		'do',
		'dump',
		'eval',
		'exit',
		'goto',
		'last',
		'next',
		'redo',
		'return',
		'sub',
		'wantarray',
		'caller',
		'import',
		'local',
		'my',
		'our',
		'package',
		'use',
		'defined',
		'dump',
		'eval',
		'formline',
		'local',
		'my',
		'our',
		'reset',
		'scalar',
		'undef',
		'wantarray',
		'alarm',
		'exec',
		'fork',
		'getpgrp',
		'getppid',
		'getpriority',
		'kill',
		'pipe',
		'qx/STRING/',
		'setpgrp',
		'setpriority',
		'sleep',
		'system',
		'times',
		'wait',
		'waitpid',
		'do',
		'import',
		'no',
		'package',
		'require',
		'use',
		'bless',
		'dbmclose',
		'dbmopen',
		'package',
		'ref',
		'tie',
		'tied',
		'untie',
		'use',
		'accept',
		'bind',
		'connect',
		'getpeername',
		'getsockname',
		'getsockopt',
		'listen',
		'recv',
		'send',
		'setsockopt',
		'shutdown',
		'socket',
		'socketpair',
		'msgctl',
		'msgget',
		'msgrcv',
		'msgsnd',
		'semctl',
		'semget',
		'semop',
		'shmctl',
		'shmget',
		'shmread',
		'shmwrite',
		'endgrent',
		'endhostent',
		'endnetent',
		'endpwent',
		'getgrent',
		'getgrgid',
		'getgrnam',
		'getlogin',
		'getpwent',
		'getpwnam',
		'getpwuid',
		'setgrent',
		'setpwent',
		'endprotoent',
		'endservent',
		'gethostbyaddr',
		'gethostbyname',
		'gethostent',
		'getnetbyaddr',
		'getnetbyname',
		'getnetent',
		'getprotobyname',
		'getprotobynumber',
		'getprotoent',
		'getservbyname',
		'getservbyport',
		'getservent',
		'sethostent',
		'setnetent',
		'setprotoent',
		'setservent',
		'gmtime',
		'localtime',
		'time',
		'times',
		'abs',
		'bless',
		'chomp',
		'chr',
		'exists',
		'formline',
		'glob',
		'import',
		'lc',
		'lcfirst',
		'map',
		'my',
		'no',
		'our',
		'prototype',
		'qx',
		'qw',
		'readline',
		'readpipe',
		'ref',
		'sub*',
		'sysopen',
		'tie',
		'tied',
		'uc',
		'ucfirst',
		'untie',
		'use',
		'subdbmclose',
		'dbmopen',
	]*/
};