projects
/
oweals
/
openssl.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Document that you need to include x509.h (to get [i2d|d2i]_DSA_PUBKEY()).
[oweals/openssl.git]
/
util
/
extract-names.pl
1
#!/usr/bin/perl
2
3
$/ = ""; # Eat a paragraph at once.
4
while(<STDIN>) {
5
chop;
6
s/\n/ /gm;
7
if (/^=head1 /) {
8
$name = 0;
9
} elsif ($name) {
10
if (/ - /) {
11
s/ - .*//;
12
s/,[ \t]+/,/g;
13
s/^[ \t]+//g;
14
s/[ \t]+$//g;
15
push @words, split ',';
16
}
17
}
18
if (/^=head1 *NAME *$/) {
19
$name = 1;
20
}
21
}
22
23
print join("\n", @words),"\n";
24