<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">package Pod::Perldoc::ToRtf;
use strict;
use warnings;
use parent qw( Pod::Simple::RTF );

use vars qw($VERSION);
$VERSION = '3.19';

sub is_pageable        { 0 }
sub write_with_binmode { 0 }
sub output_extension   { 'rtf' }

sub page_for_perldoc {
  my($self, $tempfile, $perldoc) = @_;
  return unless $perldoc-&gt;IS_MSWin32;

  my $rtf_pager = $ENV{'RTFREADER'} || 'write.exe';

  $perldoc-&gt;aside( "About to launch &lt;\"$rtf_pager\" \"$tempfile\"&gt;\n" );

  return 1 if system( qq{"$rtf_pager"}, qq{"$tempfile"} ) == 0;
  return 0;
}

1;
__END__

=head1 NAME

Pod::Perldoc::ToRtf - let Perldoc render Pod as RTF

=head1 SYNOPSIS

  perldoc -o rtf Some::Modulename

=head1 DESCRIPTION

This is a "plug-in" class that allows Perldoc to use
Pod::Simple::RTF as a formatter class.

This is actually a Pod::Simple::RTF subclass, and inherits
all its options.

You have to have Pod::Simple::RTF installed (from the Pod::Simple dist),
or this module won't work.

If Perldoc is running under MSWin and uses this class as a formatter,
the output will be opened with F&lt;write.exe&gt; or whatever program is
specified in the environment variable C&lt;RTFREADER&gt;. For example, to
specify that RTF files should be opened the same as they are when you
double-click them, you would do C&lt;set RTFREADER=start.exe&gt; in your
F&lt;autoexec.bat&gt;.

Handy tip: put C&lt;set PERLDOC=-ortf&gt; in your F&lt;autoexec.bat&gt;
and that will set this class as the default formatter to run when
you do C&lt;perldoc whatever&gt;.

=head1 SEE ALSO

L&lt;Pod::Simple::RTF&gt;, L&lt;Pod::Simple&gt;, L&lt;Pod::Perldoc&gt;

=head1 COPYRIGHT AND DISCLAIMERS

Copyright (c) 2002 Sean M. Burke.  All rights reserved.

This library is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.

This program is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of
merchantability or fitness for a particular purpose.

=head1 AUTHOR

Current maintainer: Mark Allen C&lt;&lt; &lt;mallen@cpan.org&gt; &gt;&gt;

Past contributions from:
brian d foy C&lt;&lt; &lt;bdfoy@cpan.org&gt; &gt;&gt;
Adriano R. Ferreira C&lt;&lt; &lt;ferreira@cpan.org&gt; &gt;&gt;,
Sean M. Burke C&lt;&lt; &lt;sburke@cpan.org&gt; &gt;&gt;

=cut

</pre></body></html>