This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add regular expressions tutorial and quick-start guide (from
[perl5.git]
/
keywords.pl
diff --git
a/keywords.pl
b/keywords.pl
index
d3426be
..
46dd53d
100755
(executable)
--- a/
keywords.pl
+++ b/
keywords.pl
@@
-1,5
+1,6
@@
#!/usr/bin/perl
#!/usr/bin/perl
+unlink "keywords.h";
open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n";
select KW;
open(KW, ">keywords.h") || die "Can't create keywords.h: $!\n";
select KW;
@@
-24,8
+25,10
@@
sub tab {
__END__
NULL
__END__
NULL
-__LINE__
__FILE__
__FILE__
+__LINE__
+__PACKAGE__
+__DATA__
__END__
AUTOLOAD
BEGIN
__END__
AUTOLOAD
BEGIN
@@
-35,9
+38,11
@@
END
EQ
GE
GT
EQ
GE
GT
+INIT
LE
LT
NE
LE
LT
NE
+CHECK
abs
accept
alarm
abs
accept
alarm
@@
-141,6
+146,7
@@
link
listen
local
localtime
listen
local
localtime
+lock
log
lstat
lt
log
lstat
lt
@@
-161,6
+167,7
@@
open
opendir
or
ord
opendir
or
ord
+our
pack
package
pipe
pack
package
pipe
@@
-168,9
+175,11
@@
pop
pos
print
printf
pos
print
printf
+prototype
push
q
qq
push
q
qq
+qr
quotemeta
qw
qx
quotemeta
qw
qx
@@
-231,12
+240,15
@@
sub
substr
symlink
syscall
substr
symlink
syscall
+sysopen
sysread
sysread
+sysseek
system
syswrite
tell
telldir
tie
system
syswrite
tell
telldir
tie
+tied
time
times
tr
time
times
tr