| Forest documentation | Contained in the Forest distribution. |
Forest::Tree::Writer - An abstract role for tree writers
This is an abstract role for tree writers.
All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT.
Stevan Little <stevan.little@iinteractive.com>
Copyright 2008-2010 Infinity Interactive, Inc.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| Forest documentation | Contained in the Forest distribution. |
package Forest::Tree::Writer; use Moose::Role; our $VERSION = '0.09'; our $AUTHORITY = 'cpan:STEVAN'; has 'tree' => ( is => 'rw', isa => 'Forest::Tree::Pure', required => 1, ); requires 'as_string'; sub write { my ($self, $fh) = @_; print $fh $self->as_string; } no Moose::Role; 1; __END__