File Coverage

lib/Mojolicious/Plugin/Vparam/XML.pm

Criterion	Covered	Total	%
statement	13	17	76.4
branch	4	8	50.0
condition	0	2	0.0
subroutine	4	4	100.0
pod	0	2	0.0
total	21	33	63.6

package Mojolicious::Plugin::Vparam::XML;
use Mojo::Base -strict;
use Mojolicious::Plugin::Vparam::Common qw(load_class);

sub parse_xml($) {
    my $str = shift;
    return undef unless defined $str;
    return undef unless length  $str;

    my $e = load_class('XML::LibXML');
    die $e if $e;

    my $dom = eval{ XML::LibXML->load_xml(string => $str) };
    warn $@ and return undef if $@;

    return $dom;
}

sub register {
    my ($class, $self, $app, $conf) = @_;

    return;
}

1;