Sync usage with man page.

[netbsd-mini2440.git] / crypto / external / bsd / openssl / dist / util / 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";