diff options
| author | cvs2svn <admin@example.com> | 2010-10-01 22:54:20 +0000 |
|---|---|---|
| committer | cvs2svn <admin@example.com> | 2010-10-01 22:54:20 +0000 |
| commit | 4e3116ba582489ffb124277aa36dfb5a1570558c (patch) | |
| tree | 75985dcb1495258d2f93d846c0e2d85abd778661 /src/lib/libcrypto/util/extract-section.pl | |
| parent | 75291ae343a87368ad49c13ac02f85a88159417f (diff) | |
| download | openbsd-openssh_1_0_0_a.tar.gz openbsd-openssh_1_0_0_a.tar.bz2 openbsd-openssh_1_0_0_a.zip | |
This commit was manufactured by cvs2git to create tag 'openssh_1_0_0_a'.openssh_1_0_0_a
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 | |||