# Mojolicious
$self->plugin('json_to_xml');

# Mojolicious::Lite
plugin 'json_to_xml';

# or
plugin 'json_to_xml', { status => 200 }; # JSON to XML only 200 status code

# or
plugin 'json_to_xml', {
        exclude => [ qr{/no\.xml}, '/no2.xml' ] # Exclude urls
};

get '/test.json' => sub { shift->render_json({ response => 'ok' }) };

# /test.json : {"response": "ok"}
# /test.xml  :
<?xml version="1.0" encoding="UTF-8"?>
<response>ok</response>

get '/list.json' => sub { shift->render_json([1, 2, 3]) };

# /list.json : [1,2,3]
# /list.xml  :
<?xml version="1.0" encoding="UTF-8"?>
<list><item>1</item><item>2</item><item>3</item></list>

get '/tags.json' => sub { shift->render_json({
        tests => [
                { id => 1, title => 'JSON & XML', __node => 'test' },
                { id => 2, title => 'JSON > XML', },
        ]
}) };

# /tags.json : {"tests":[{"id":1},{"id":2}]}
# /tags.xml  :
<?xml version="1.0" encoding="UTF-8"?>
<tests>
        <test><id>1</id><title>JSON &amp; XML</title></test>
        <test><id>2</id><title>JSON &gt; XML</title></test>
</tests>

$plugin->register;

my $xml = $plugin->json2xml( $json );