[comp.lang.perl] Submission: tgrind entry for Perl

przemek@rrdstrad.nist.gov (Przemek Klosowski) (04/30/91)

As the title indicates, the tgrindefs entry for Perl follows. I keep it in 
my tgrindefs file, and I can beautifully print Perl scripts using TeX
formatting after massaging by "tgrind -lperl". Critiques/fixes/praises
welcome
		przemek

perl|PERL|Perl:\
	:pb=^\d?sub\d\p\d\a?:bb={:be=}:cb=(^| |	)#:ce=$:\
	:lb=':le=\e':tl:sb=":se=\e":\
	:id=$@_0123456789abcdefghijklmnopqrstuvvxyzABCDEFGHIJKLMNOPQRSTUVVXYZ:\
	:kw=do while unless for foreach goto return if then else endif cd echo\ 
	end sub accept atan2 bind binmode chdir chmod chop chown chroot close\
	closedir connect cos crypt defined delete die do dump each\
	eof eval exec exit exp fcntl fileno flock fork getc gmtime\
	grep hex index int ioctl join keys kill last length link listen\
	local localtime log lstat mkdir next oct open opendir ord pack pipe\
	pop print printf push rand read readdir readlink recv redo rename\
	reset return reverse rewinddir rindex rmdir s seek seekdir select send\
	shift shutdown sin sleep sort splice split sprintf sqrt srand stat\
	study substr symlink syscall system tell telldir time times tr umask\
	undef unlink unpack unshift utime values vec wait wantarray warn write\
	$FS $0 $1 $2 $3 $4 $5 $6 $7 $8 $9 @ARGV @INC %ENV %SIG\
	eq ne gt lt le ge:
--
			przemek klosowski (przemek@ndcvx.cc.nd.edu)
			Physics Department
			University of Notre Dame IN 46556

tchrist@convex.COM (Tom Christiansen) (05/01/91)

I can never get these to work right.  They work for small cases, 
but with long ones, the subroutine names eventually get lost, 
stuff stops being emboldened, etc.

Also, that's a lot of keywords.  My vgrind says "too many keywords,"
but aside from that, it starts to look a bit messy.  I'm for making
the flow-control things only be bold.

There were also a few things in the posted list that I don't know
where came from, like `end'.

--tom