//////////////////////////////////////////////////////////////////////////////
//
// Perl highlighter
//
//////////////////////////////////////////////////////////////////////////////

Language:               Perl
Filter:                 Perl files (*.cgi, *.pl, *.pm, *.plx)|*.cgi, *.pl, *.pm, *.plx
HelpFile:
CaseSensitive:          1
LineComment:            #
//?? BlockCommentBeg:        /*
//   BlockCommentEnd:        */
IdentifierBegChars:     a..z A..Z _
IdentifierChars:        a..z A..Z _ 0..9
NumConstBegChars:       0..9
NumConstChars:          0..9 abcdefx.
EscapeChar:             \

KeyWords1:              NULL __FILE__ __LINE__ __PACKAGE__ __DATA__ __END__ AUTOLOAD
                        BEGIN CORE DESTROY END EQ GE GT INIT LE LT NE CHECK abs accept
                        alarm and atan2 bind binmode bless caller chdir chmod chomp chop
                        chown chr chroot close closedir cmp connect continue cos crypt
                        dbmclose dbmopen defined delete die do dump each else elsif endgrent
                        endhostent endnetent endprotoent endpwent endservent eof eq eval
                        exec exists exit exp fcntl fileno flock for foreach fork format
                        formline ge getc getgrent getgrgid getgrnam gethostbyaddr gethostbyname
                        gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername
                        getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent
                        getpwent getpwnam getpwuid getservbyname getservbyport getservent
                        getsockname getsockopt glob gmtime goto grep gt hex if index 
                        int ioctl join keys kill last lc lcfirst le length link listen 
                        local localtime lock log lstat lt m map mkdir msgctl msgget msgrcv 
                        msgsnd my ne next no not oct open opendir or ord our pack package 
                        pipe pop pos print printf prototype push q qq qr quotemeta qu 
                        qw qx rand read readdir readline readlink readpipe recv redo 
                        ref rename require reset return reverse rewinddir rindex rmdir 
                        s scalar seek seekdir select semctl semget semop send setgrent 
                        sethostent setnetent setpgrp setpriority setprotoent setpwent 
                        setservent setsockopt shift shmctl shmget shmread shmwrite shutdown 
                        sin sleep socket socketpair sort splice split sprintf sqrt srand 
                        stat study sub substr symlink syscall sysopen sysread sysseek 
                        system syswrite tell telldir tie tied time times tr truncate 
                        uc ucfirst umask undef unless unlink unpack unshift untie until 
                        use utime values vec wait waitpid wantarray warn while write
                        x xor y

KeyWords2:		alias ar asa awk banner basename bash bc bdiff break
                        bunzip2 bzip2 cal calendar case cat cc cd chmod cksum
                        clear cmp col comm compress continue cp cpio crypt
                        csplit ctags cut date dc dd declare deroff dev df diff diff3
                        dircmp dirname do done du echo ed egrep elif else env
                        esac eval ex exec exit expand export expr false fc
                        fgrep fi file find fmt fold for function functions
                        getconf getopt getopts grep gres hash head help
                        history iconv id if in integer jobs join kill local lc
                        let line ln logname look ls m4 mail mailx make
                        man mkdir more mt mv newgrp nl nm nohup ntps od
                        pack paste patch pathchk pax pcat perl pg pr print
                        printf ps pwd read readonly red return rev rm rmdir
                        sed select set sh shift size sleep sort spell
                        split start stop strings strip stty sum suspend
                        sync tail tar tee test then time times touch tr
                        trap true tsort tty type typeset ulimit umask unalias
                        uname uncompress unexpand uniq unpack unset until
                        uudecode uuencode vi vim vpax wait wc whence which
                        while who wpaste wstart xargs zcat


KeyWords3:

StringBegChar:          "
StringEndChar:          "
MultilineStrings:       0
UsePreprocessor:        0
CurrLineHighlighted:    0

SpaceCol:               clWindowText clWindow
Keyword1Col:            clNavy clWindow B
Keyword2Col:            clBlue clWindow B
Keyword3Col:            clOlive clWindow B
IdentifierCol:          clWindowText clWindow
CommentCol:             clGray clWindow I
NumberCol:              clRed clWindow
StringCol:              clMaroon clWindow
SymbolCol:              clGray clWindow
PreprocessorCol:        clBlue clWindow
SelectionCol:           clWhite clNavy
CurrentLineCol:         clBlack clYellow

