diff options
author | Russ Allbery <rra@stanford.edu> | 2000-12-24 21:09:30 -0800 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-29 18:27:30 +0000 |
commit | 738498554754dd90699c8e9143242cd60b1e5e37 (patch) | |
tree | ae368857292fa491b10234e1045d06cd644f3215 /pod/pod2text.PL | |
parent | 326fd4b6c63d624f86be55b75291c6fa7368b680 (diff) | |
download | perl-738498554754dd90699c8e9143242cd60b1e5e37.tar.gz |
podlators 1.06 released
Message-ID: <ylwvcosl4l.fsf@windlord.stanford.edu>
p4raw-id: //depot/perl@8259
Diffstat (limited to 'pod/pod2text.PL')
-rw-r--r-- | pod/pod2text.PL | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/pod/pod2text.PL b/pod/pod2text.PL index b4965cb00f..7b5727decc 100644 --- a/pod/pod2text.PL +++ b/pod/pod2text.PL @@ -75,8 +75,8 @@ my %options; $options{sentence} = 0; Getopt::Long::config ('bundling'); GetOptions (\%options, 'alt|a', 'color|c', 'help|h', 'indent|i=i', - 'loose|l', 'quotes|q=s', 'sentence|s', 'termcap|t', - 'width|w=i') or exit 1; + 'loose|l', 'overstrike|o', 'quotes|q=s', 'sentence|s', + 'termcap|t', 'width|w=i') or exit 1; pod2usage (1) if $options{help}; # Figure out what formatter we're going to use. -c overrides -t. @@ -89,8 +89,11 @@ if ($options{color}) { } elsif ($options{termcap}) { $formatter = 'Pod::Text::Termcap'; require Pod::Text::Termcap; +} elsif ($options{overstrike}) { + $formatter = 'Pod::Text::Overstrike'; + require Pod::Text::Overstrike; } -delete @options{'color', 'termcap'}; +delete @options{'color', 'termcap', 'overstrike'}; # Initialize and run the formatter. my $parser = $formatter->new (%options); @@ -104,7 +107,7 @@ pod2text - Convert POD data to formatted ASCII text =head1 SYNOPSIS -pod2text [B<-aclst>] [B<-i> I<indent>] [B<-q> I<quotes>] [B<-w> I<width>] +pod2text [B<-aclost>] [B<-i> I<indent>] [B<-q> I<quotes>] [B<-w> I<width>] [I<input> [I<output>]] pod2text B<-h> @@ -150,6 +153,13 @@ printed after C<=head1>, although one is still printed after C<=head2>, because this is the expected formatting for manual pages; if you're formatting arbitrary text documents, using this option is recommended. +=item B<-o>, B<--overstrike> + +Format the output with overstruck printing. Bold text is rendered as +character, backspace, character. Italics and file names are rendered as +underscore, backspace, character. Many pagers, such as B<less>, know how +to convert this to bold or underlined text. + =item B<-q> I<quotes>, B<--quotes>=I<quotes> Sets the quote marks used to surround CE<lt>> text to I<quotes>. If |