| XML-Toolkit documentation | Contained in the XML-Toolkit distribution. |
XML::Toolkit::App - An XML::Toolkit Application
This documentation refers to version 0.02.
use XML::Toolkit::App;
my $loader = XML::Toolkit::App->new( xmlns => { '' => 'MyApp' } )->loader;
$loader->parse_file( $file );
print join '', @{ $loader->render };
or
use XML::Toolkit::App;
my $builder = XML::Toolkit::App->new( xmlns => { '' => 'MyApp' } )->builder
$builder->parse_string($xml)
say $builder->render()
Moose
Chris Prather (chris@prather.org)
Copyright 2009 by Chris Prather.
This software is free. It is licensed under the same terms as Perl itself.
| XML-Toolkit documentation | Contained in the XML-Toolkit distribution. |
package XML::Toolkit::App; use Moose; our $VERSION = '0.02'; use XML::Toolkit::Config::Container; with qw( XML::Toolkit::Builder::NamespaceRegistry ); sub default_xmlns { { '' => 'MyApp', } } has _config => ( does => 'XML::Toolkit::Config', handles => 'XML::Toolkit::Config', lazy => 1, init_arg => 'config', builder => '_build_config_container', ); sub _build_config_container { my ($self) = @_; XML::Toolkit::Config::Container->new( xmlns => $self->xmlns ),; } 1; __END__