diff options
| author | cvs2svn <admin@example.com> | 2012-10-13 21:23:59 +0000 |
|---|---|---|
| committer | cvs2svn <admin@example.com> | 2012-10-13 21:23:59 +0000 |
| commit | 9c1f0407376a60273b27095b86ba1484984ab668 (patch) | |
| tree | 7404f2d85ce601b943234e237fada2b98831c9ca /src/lib/libcrypto/util/extract-section.pl | |
| parent | adb31f466163d59ad933cf9d299ce6c610f1cff3 (diff) | |
| download | openbsd-openssl_1_0_1_c.tar.gz openbsd-openssl_1_0_1_c.tar.bz2 openbsd-openssl_1_0_1_c.zip | |
This commit was manufactured by cvs2git to create tag 'openssl_1_0_1_c'.openssl_1_0_1_c
Diffstat (limited to 'src/lib/libcrypto/util/extract-section.pl')
| -rw-r--r-- | src/lib/libcrypto/util/extract-section.pl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/lib/libcrypto/util/extract-section.pl b/src/lib/libcrypto/util/extract-section.pl new file mode 100644 index 0000000000..7a0ba4f69a --- /dev/null +++ b/src/lib/libcrypto/util/extract-section.pl | |||
| @@ -0,0 +1,12 @@ | |||
| 1 | #!/usr/bin/perl | ||
| 2 | |||
| 3 | while(<STDIN>) { | ||
| 4 | if (/=for\s+comment\s+openssl_manual_section:(\S+)/) | ||
| 5 | { | ||
| 6 | print "$1\n"; | ||
| 7 | exit 0; | ||
| 8 | } | ||
| 9 | } | ||
| 10 | |||
| 11 | print "$ARGV[0]\n"; | ||
| 12 | |||