The wordfile that I use with UltraEdit. Provides for variables to be highlighted according to their sigil. Also includes better pragma support as well as a number of other tricks. Oh, also function prototypes wont confuse the function list with this version.
Consult the UltraEdit docs for instructions on how to install it.
Sorry if this is the wrong place to post it, but I couldnt figure out anywhere better.
Update After comments by podmaster and crazyinsomniac I have made a few modifications and enhancements. Thanks guys.
BTW: Id be interested to hear whether the function list should show protypes. /msg or reply if you think they should.
/L1"Perl" Line Comment = # Escape Char = \ String Chars = "' File Exte
+nsions = 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 P
+LS~ 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 gethosten
+t getlogin getnetbyaddr getnetbyname getnetent getpeername getpgrp ge
+tppid getpriority getprotobyname getprotobynumber getprotoent getpwen
+t getpwnam getpwuid getservbyname getservbyport getservent getsocknam
+e 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 rewi
+nddir rindex rmdir
scalar seek seekdir select semctl semgett semop send setgrent sethoste
+nt setnetent setpgrp setpriority setprotoent setpwent setservent sets
+ockopt shift shmctl shmget shmread shmwrite shutdown sin sleep socket
+ socketpair sort splice split sprintf sqrt srand stat study substr sy
+mlink 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"
** %