#!/usr/bin/perl
+unlink "keywords.h";
open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n";
select KW;
__END__
NULL
-__LINE__
__FILE__
+__LINE__
+__PACKAGE__
__DATA__
__END__
AUTOLOAD
EQ
GE
GT
+INIT
LE
LT
NE
+CHECK
abs
accept
alarm
listen
local
localtime
+lock
log
lstat
lt
opendir
or
ord
+our
pack
package
pipe
pos
print
printf
+prototype
push
q
qq
+qr
quotemeta
qw
qx
substr
symlink
syscall
+sysopen
sysread
+sysseek
system
syswrite
tell
telldir
tie
+tied
time
times
tr