On 08/13/2006 08:36 AM, Ken Perl wrote:
what's correct regular expression on extracting only NAME and
DESCRIPTION section from pod text file?
I have tried this, but failed!
perl -e '$c=`pod2text /data/WebGUI/lib/WebGUI/User.pm`;$c =~
s/(NAME.*)SYNOPSIS/$1/;print $c'
foreach $_ (`pod2text /usr/bin/pod2text `) {
if (/^NAME|SYN/../^$/) { print }
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
