Socket::my_inet_aton() tweak
[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
7d07dbc2 38INIT
7d30b5c4 39CHECK
a0d0e21e 40abs
41accept
42alarm
43and
44atan2
45bind
46binmode
47bless
48caller
49chdir
50chmod
51chomp
52chop
53chown
54chr
55chroot
56close
57closedir
58cmp
59connect
60continue
61cos
62crypt
63dbmclose
64dbmopen
65defined
66delete
67die
68do
69dump
70each
71else
72elsif
73endgrent
74endhostent
75endnetent
76endprotoent
77endpwent
78endservent
79eof
80eq
81eval
82exec
83exists
84exit
85exp
86fcntl
87fileno
88flock
89for
90foreach
91fork
92format
93formline
94ge
95getc
96getgrent
97getgrgid
98getgrnam
99gethostbyaddr
100gethostbyname
101gethostent
102getlogin
103getnetbyaddr
104getnetbyname
105getnetent
106getpeername
107getpgrp
108getppid
109getpriority
110getprotobyname
111getprotobynumber
112getprotoent
113getpwent
114getpwnam
115getpwuid
116getservbyname
117getservbyport
118getservent
119getsockname
120getsockopt
121glob
122gmtime
123goto
124grep
125gt
126hex
127if
128index
129int
130ioctl
131join
132keys
133kill
134last
135lc
136lcfirst
137le
138length
139link
140listen
141local
142localtime
c0329465 143lock
a0d0e21e 144log
145lstat
146lt
147m
148map
149mkdir
150msgctl
151msgget
152msgrcv
153msgsnd
154my
155ne
156next
157no
158not
159oct
160open
161opendir
162or
163ord
77ca0c92 164our
a0d0e21e 165pack
166package
167pipe
168pop
169pos
170print
171printf
c07a80fd 172prototype
a0d0e21e 173push
174q
175qq
8782bef2 176qr
a0d0e21e 177quotemeta
178qw
179qx
180rand
181read
182readdir
183readline
184readlink
185readpipe
186recv
187redo
188ref
189rename
190require
191reset
192return
193reverse
194rewinddir
195rindex
196rmdir
197s
198scalar
199seek
200seekdir
201select
202semctl
203semget
204semop
205send
206setgrent
207sethostent
208setnetent
209setpgrp
210setpriority
211setprotoent
212setpwent
213setservent
214setsockopt
215shift
216shmctl
217shmget
218shmread
219shmwrite
220shutdown
221sin
222sleep
223socket
224socketpair
225sort
226splice
227split
228sprintf
229sqrt
230srand
231stat
232study
233sub
234substr
235symlink
236syscall
c07a80fd 237sysopen
a0d0e21e 238sysread
137443ea 239sysseek
a0d0e21e 240system
241syswrite
242tell
243telldir
244tie
c07a80fd 245tied
a0d0e21e 246time
247times
248tr
249truncate
250uc
251ucfirst
252umask
253undef
254unless
255unlink
256unpack
257unshift
258untie
259until
260use
261utime
262values
263vec
264wait
265waitpid
266wantarray
267warn
268while
269write
270x
271xor
272y