/L1"Perl" Line Comment = # Escape Char = \ String Chars = "' File Extensions = CGI CGI.bak CGI~ FCGI FCGI.bak FCGI~ PL PL.bak PL~ PM PM.bak PM~ PMS PMS.bak PMS~ PLF PLF.bak PLF~ PMF PMF.bak PMF~ PLS PLS.bak PLS~ PMBAK PMBAK.bak PMBAK~ PLBAK PLBAK.bak PLBAK~
/Delimiters = ~!^&*()+-=|\/{}[];"'<> 	,.?/
/Indent Strings = "{"
/Unindent Strings = "}"
/Function String = "%[ ^t]++sub[ ^t]+^([a-z_]+[a-z_0-9]++^)[ {^p(^t]"
/C1"Keywords+Builtins"
continue
do
else elsif exit
for foreach
goto
if
last local
my
next no
our
redo return
sub
until unless
while
/C2"Functions"
-A -B -C -M -O -R -S -T -W -X -b -c -d -e -f -g -k -l -o -p -r -s -t -u -w -x -z
accept alarm atan2
bind binmode bless
caller chdir chmod chomp chop chown chr chroot close closedir connect cos crypt
dbmclose dbmopen defined delete dump
each endgrent endhostent endnetent endprotoent endpwent endservent eof eval exec exp exists
fcntl fileno flock fork formline format
getc getgrent getgrgid getgrname gethostbyaddr gethostbyname gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent getpwent getpwnam getpwuid getservbyname getservbyport getservent getsockname getsockopt glob gmtime grep
hex
index int ioctl
join
keys kill
lc lcfirst length link listen localtime log lstat
map mkdir msgctl msgget msgrcv msgsnd
oct open opendir ord
pack pipe pop pos print printf push
rand read readdir readline readlink recv ref rename reset reverse rewinddir rindex rmdir
scalar seek seekdir select semctl semgett 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 substr symlink syscall sysopen sysread system syswrite
tell telldir tie tied time times truncate
uc ucfirst umask undef unlink unpack unshift utime untie
values vec
wait waitpid wantarray write
quotemeta
/C3"Magic Tied Pragma Package"
AUTOLOAD
BEGIN
CLEAR CORE
DELETE DESTROY
END EXISTS
FETCH FETCHSIZE FIRSTKEY
NEXTKEY
POP PUSH
SHIFT SPLICE STORE STORESIZE SUPER
TIEARRAY TIEHASH TIESCALAR
UNIVERSAL UNSHIFT
__DATA__ __END__ __FILE__ __LINE__ __PACKAGE__
attributes attrs autouse
base blib bytes
charnames constant
diagnostics
fields filetest
integer
less lib locale
open ops overload
package perllocal
re require
sigtrap strict subs
utf8 use
vars
warnings
/C4"Operators"
and
eq
ge gt
le lt
ne not
or
x xor
+ ++
- ->
*
/
! !~
< <= <=>
> >=
= => =~
| ||
& &&
^
~
m
q qq qw qx qr
s
tr
y
/C5"Debugging Words"
warn
die
carp croak cluck confess
/C6"Scalars"
** $
/C7"Arrays"
** @
/C8"Hashes"
** %