Pod::Tree::Pod - Convert a Pod::Tree back to a POD

       Steven McDougall, swmcd@world.std.com

       Copyright (c) 2000-2003 by Steven McDougall. This module is free software; you can redistribute it and/or
       modify it under the same terms as Perl itself.

perl v5.36.0                                       2022-11-19                                Pod::Tree::Pod(3pm)

       "Pod::Tree::Pod" converts a Pod::Tree back to a POD.  The destination is fixed when the object is
       created.  The "translate" method does the actual translation.

       For convenience, Pod::Tree::Pod can write the POD to a variety of destinations.  The "new" method
       resolves the $dest argument.

   Destinationresolution
       "Pod::Tree::Pod" can write HTML to either of 2 destinations.  "new" resolves $dest by checking these
       things, in order:

       1.  If $dest is a reference, then it is taken to be an "IO::File" object that is already open on the file
           where the POD will be written.

       2.  If  $dest  is  not  a  reference,  then  it is taken to be the name of the file where the POD will be
           written.

       "Pod::Tree::Pod::new: not enough arguments"
           (F) "new" called with fewer than 2 arguments.

       "Pod::Tree::HTML::new: Can't open $dest: $!"
           (F) The destination file couldn't be opened.

$pod = "new" "Pod::Tree::Pod" $tree, $dest
           Creates a new "Pod::Tree::Pod" object.

           $tree is a "Pod::Tree" object that represents a POD.  $pod writes the POD to $dest.  See "Destination
           resolution" for details.

       $pod->"translate"
           Writes the text of the POD.  This method should only be called once.

       Pod::Tree::Pod - Convert a Pod::Tree back to a POD

       •   The destination doesn't actually have to be an "IO::File" object.  It may be any object  that  has  a
           "print" method.

perl(1), "Pod::Tree", "Pod::Tree::Node"

         use Pod::Tree::Pod;

         $tree =  Pod::Tree->new;

         $dest =  IO::File->new;
         $dest = "file.pod";

         $pod  =  Pod::Tree::Pod->new($tree, $dest);

         $pod->translate;