diff options
Diffstat (limited to 'crypto/openssl/util/extract-names.pl')
| -rw-r--r-- | crypto/openssl/util/extract-names.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/crypto/openssl/util/extract-names.pl b/crypto/openssl/util/extract-names.pl index 744a8e2..35bd6ed 100644 --- a/crypto/openssl/util/extract-names.pl +++ b/crypto/openssl/util/extract-names.pl @@ -9,9 +9,11 @@ while(<STDIN>) { } elsif ($name) { if (/ - /) { s/ - .*//; - s/,[ \t]+/,/g; - s/^[ \t]+//g; - s/[ \t]+$//g; + s/,\s+/,/g; + s/\s+,/,/g; + s/^\s+//g; + s/\s+$//g; + s/\s/_/g; push @words, split ','; } } |
