Re: Exceptions in IPC::Open2
[p5sagit/p5-mst-13.2.git] / keywords.pl
CommitLineData
a0d0e21e 1#!/usr/bin/perl
2
36477c24 3unlink "keywords.h";
a0d0e21e 4open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n";
5select KW;
6
7# Read & print data.
8
9$keynum = 0;
10while (<DATA>) {
11 chop;
12 next unless $_;
13 next if /^#/;
14 ($keyword) = split;
15 print &tab(5, "#define KEY_$keyword"), $keynum++, "\n";
16}
17
18###########################################################################
19sub tab {
20 local($l, $t) = @_;
21 $t .= "\t" x ($l - (length($t) + 1) / 8);
22 $t;
23}
24###########################################################################
25__END__
26
27NULL
a0d0e21e 28__FILE__
68dc0745 29__LINE__
30__PACKAGE__
e50aee73 31__DATA__
a0d0e21e 32__END__
33AUTOLOAD
34BEGIN
35CORE
36DESTROY
37END
38EQ
39GE
40GT
7d07dbc2 41INIT
a0d0e21e 42LE
43LT
44NE
45abs
46accept
47alarm
48and
49atan2
50bind
51binmode
52bless
53caller
54chdir
55chmod
56chomp
57chop
58chown
59chr
60chroot
61close
62closedir
63cmp
64connect
65continue
66cos
67crypt
68dbmclose
69dbmopen
70defined
71delete
72die
73do
74dump
75each
76else
77elsif
78endgrent
79endhostent
80endnetent
81endprotoent
82endpwent
83endservent
84eof
85eq
86eval
87exec
88exists
89exit
90exp
91fcntl
92fileno
93flock
94for
95foreach
96fork
97format
98formline
99ge
100getc
101getgrent
102getgrgid
103getgrnam
104gethostbyaddr
105gethostbyname
106gethostent
107getlogin
108getnetbyaddr
109getnetbyname
110getnetent
111getpeername
112getpgrp
113getppid
114getpriority
115getprotobyname
116getprotobynumber
117getprotoent
118getpwent
119getpwnam
120getpwuid
121getservbyname
122getservbyport
123getservent
124getsockname
125getsockopt
126glob
127gmtime
128goto
129grep
130gt
131hex
132if
133index
134int
135ioctl
136join
137keys
138kill
139last
140lc
141lcfirst
142le
143length
144link
145listen
146local
147localtime
c0329465 148lock
a0d0e21e 149log
150lstat
151lt
152m
153map
154mkdir
155msgctl
156msgget
157msgrcv
158msgsnd
159my
160ne
161next
162no
163not
164oct
165open
166opendir
167or
168ord
169pack
170package
171pipe
172pop
173pos
174print
175printf
c07a80fd 176prototype
a0d0e21e 177push
178q
179qq
180quotemeta
181qw
182qx
183rand
184read
185readdir
186readline
187readlink
188readpipe
189recv
190redo
191ref
192rename
193require
194reset
195return
196reverse
197rewinddir
198rindex
199rmdir
200s
201scalar
202seek
203seekdir
204select
205semctl
206semget
207semop
208send
209setgrent
210sethostent
211setnetent
212setpgrp
213setpriority
214setprotoent
215setpwent
216setservent
217setsockopt
218shift
219shmctl
220shmget
221shmread
222shmwrite
223shutdown
224sin
225sleep
226socket
227socketpair
228sort
229splice
230split
231sprintf
232sqrt
233srand
234stat
235study
236sub
237substr
238symlink
239syscall
c07a80fd 240sysopen
a0d0e21e 241sysread
137443ea 242sysseek
a0d0e21e 243system
244syswrite
245tell
246telldir
247tie
c07a80fd 248tied
a0d0e21e 249time
250times
251tr
252truncate
253uc
254ucfirst
255umask
256undef
257unless
258unlink
259unpack
260unshift
261untie
262until
263use
264utime
265values
266vec
267wait
268waitpid
269wantarray
270warn
271while
272write
273x
274xor
275y