XML::Toolkit::Cmd::Command::validate - validate XML round tripping


XML-Toolkit documentation Contained in the XML-Toolkit distribution.

Index


Code Index:

NAME

Top

XML::Toolkit::Cmd::Command::validate - validate XML round tripping

VERSION

Top

This documentation refers to version 0.01.

SYNOPSIS

Top

     xmltk generate 

DESCRIPTION

Top

The XML::Toolkit::Cmd::Command::validate class implements ...

SUBROUTINES / METHODS

Top

_build_namespace()

[Description of subroutine]

_build__loader()

Arguments: $_[0]

[Description of method]

run(self)

[Description of method]

DEPENDENCIES

Top

Modules used, version dependencies, core yes/no

Moose

namespace::autoclean

XML::Toolkit::Loader

Moose::Util::TypeConstraints

NOTES

Top

...

BUGS AND LIMITATIONS

Top

None known currently, please email the author if you find any.

AUTHOR

Top

Chris Prather (dcp@domain.tld)

LICENCE

Top

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::Cmd::Command::validate;
use Moose;
use namespace::autoclean;

use aliased 'XML::Toolkit::Config::Container' => 'XMLTK::App';
use MooseX::Types::Path::Class qw(File);
use Moose::Util::TypeConstraints;

extends qw(MooseX::App::Cmd::Command XML::Toolkit::App);

with qw(
  MooseX::Getopt::Dashes
);

has input => (
    isa      => File,
    is       => 'ro',
    coerce   => 1,
    required => 1,
);

has namespace => (
    isa        => 'Str',
    is         => 'ro',
    lazy_build => 1,
);

sub _build_namespace { 'MyApp' }

sub run {
    my ($self) = @_;
    my $loader = $self->loader;
    $loader->parse_file( $self->input->stringify );
    my $generator = $self->generator;
    $generator->render_object($loader->root_object);
    print $generator->output;
}

__PACKAGE__->meta->make_immutable;
1;
__END__