Revision 74c1dc909ddd872fe9ad5d2baf9aaa81eaadcc3c authored by Andy Polyakov on 21 January 2015, 15:49:27 UTC, committed by Matt Caswell on 22 January 2015, 09:45:10 UTC
Reviewed-by: Tim Hudson <tjh@openssl.org>
1 parent 638f75b
extract-section.pl
#!/usr/bin/perl
while(<STDIN>) {
if (/=for\s+comment\s+openssl_manual_section:(\S+)/)
{
print "$1\n";
exit 0;
}
}
print "$ARGV[0]\n";

Computing file changes ...