mikef@hpsadle.HP.COM (Mike Ferrara) (06/06/90)
Here are my vgrindefs for perl. They've been tested with tgrind, though
you may have to expand a few buffer sizes to fit in all of the keywords.
Mike Ferrara M/S 2LRR
HP Signal Analysis Div R&D
1212 Valley House Drive
Rohnert Park, CA 94928
(707) 794-4479
mikef%hpsadle@hp-sde.sde.hp.com
mikef@hpsadle.hp.com
-------------------------cut--------------------------------
PERL|perl|pl:\
:pb=^\d?sub\d\p(\d|{):\
:bb={:be=}:cb=\d#:ce=$:sb=":se=\e":lb=':le=\e':\
:tl:\
:kw=if until while elsif else unless for foreach continue sub\
accept atan2 bind chdir chmod chop chown chroot close\
closedir connect cos crypt dbmclose dbmopen defined delete die\
do dump each eof eval exec exit exp fcntl fileno flock fork\
getc getlogin getpeername getpgrp getppid getpriority getpwnam\
getgrnam gethostbyname getnetbyname getprotobyname getpwuid getgrgid\
getservbyname gethostbyaddr getnetbyaddr getprotobynumber\
getservbyport getpwent getgrent gethostent getnetent getprotoent\
getservent setpwent setgrent sethostent setnetent setprotoent\
setservent endpwent endgrent endhostent endnetent endprotoent\
endservent getsockname getsockopt gmtime goto grep hex ioctl\
index int join keys kill last length link listen local localtime\
log lstat m mkdir next oct open opendir ord pack pop print printf\
push q qq rand read readdir readlink recv redo rename reset return\
reverse rewinddir rindex rmdir s seek seekdir select setpgrp send\
setpriority setsockopt shift shutdown sin sleep socket socketpair\
sort split sprintf sqrt srand stat study substr syscall system\
symlink tell telldir time times tr y umask undef unlink unpack\
unshift utime values vec wait wantarray warn write: