http://www.perlmonks.org?node_id=106364


in reply to Parsing (l)unix man pages

perl -e 'open(FILE, "/usr/bin/man ssh | "); while(<FILE>) { print if /
+SYNOPSIS/ }'

[download]
Works great, on Solaris. Maybe the fancy formatting (bold fonts etc) of the man page on your system is what is getting you hung up? Having weird terminal control characters in the output from man to do font decorations might be making your match fail.

Replies are listed 'Best First'.
Re: Re: Parsing (l)unix man pages
by Cine (Friar) on Aug 21, 2001 at 00:57 UTC
    Man usually just prints the text when it sees that the output is not going to a terminal...

    T I M T O W T D I
[reply]
      
perl -e 'open(FILE, "/usr/bin/man ssh | "); while(<FILE>) { print if /SYNOPSIS/ }'
(testing)%perl -e 'open(FILE, "/usr/bin/man ssh | "); while(<FILE>) { print if /SYNOPSIS/ }'
(testing)%
      well see that doesn't work for me... I'm using hyperterminal in winNT dunno if that is why or not. I just get no output from the above cmd.
[reply]
        :(testing)%perl -e 'open(FILE, "/usr/bin/man ssh| ");while(<FILE>){pri
+nt if /SYNOPSIS/ }'
:(testing)%

        [download]
        heh, didn't use code tags and it took out the <FILE> part but it still doesn't work.
[reply]
[d/l]

In Section Seekers of Perl Wisdom