NAME

XML::XML2JSON - Convert XML into JSON (and back again) using XML::LibXML

SYNOPSIS

use XML::XML2JSON;

my $XML = '<test><element foo="bar"/></test>';

my $XML2JSON = XML::XML2JSON->new();

my $JSON = $XML2JSON->convert($XML);

print $JSON;

my $RestoredXML = $XML2JSON->json2xml($JSON);

DESCRIPTION

I used Google for inspiration: http://code.google.com/apis/gdata/json.html

In short:

  • The response is represented as a JSON object; each nested element or attribute is represented as a name/value property of the object.

  • Attributes are converted to String properties.

  • Attribute names are prefixed with "@" so that they dont conflict with child elements of the same name.

  • Child elements are converted to Object properties.

  • Text values of tags are converted to $t properties.

Namespace

  • If an element has a namespace alias, the alias and element are concatenated using "$". For example, ns:element becomes ns$element.

XML

  • XML version and encoding attributes are converted to attribute version and encoding of the root element, respectively.

METHODS

new

Creates a new XML::XML2JSON object.

It supports the following arguments:

module

This is the JSON module that you want to use. By default it will use the first one it finds, in the following order: JSON::Syck, JSON::XS, JSON, JSON::DWIW

private_elements

An arraryref of element names that should be removed after calling the sanitize method. Children of the elements will be removed as well.

empty_elements

An arrayref of element names that should have their attributes and text content removed after calling the sanitize method. This leaves any children of the elements intact.

private_attributes

An arrayref of attribute names that should be removed after calling the sanitize method.

attribute_prefix

All attributes will be prefixed by this when converting to JSON. This is "@" by default. You can set this to "", but if you do, any attributes that conflict with a child element name will be lost.

content_key

This is the name of the hash key that text content will be added to. This is "$t" by default.

force_array

If set to true, child elements that appear only once will be added to a one element array. If set to false, child elements that appear only once will be assesible as a hash value.

The default is false.

pretty

If set to true, output will be formatted to be easier to read whenever possible.

debug

If set to true, will print warn messages to describe what it is doing.

convert

Takes an XML string as input. Returns a string of sanitized JSON.

Calling this method is the same as:

my $Obj = $XML2JSON->xml2obj($XML);
$XML2JSON->sanitize($Obj);
my $JSON = $XML2JSON->obj2json($Obj);

xml2json

This is an alias for convert.

obj2json

Takes a perl data object as input. Return a string of equivalent JSON.

dom2obj

Takes an XML::LibXML::Document object as input. Returns an equivalent perl data structure.

xml2obj

Takes an xml string as input. Returns an equivalent perl data structure.

sanitize

Takes a perl hashref as input. (You would normally pass this method the object returned by the xml2obj method.)

This method does not return anything. The object passed into it is directly modified.

Since JSON is often returned directly to a client's browser, there are cases where sensitive data is left in the response.

This method allows you to filter out content that you do not want to be included in the JSON.

This method uses the private_elements, empty_elements and private_attributes arguments which are set when calling the "new" method.

json2xml

Takes a JSON string as input. Returns a string of equivalent XML.

Calling this method is the same as:

my $Obj = $Self->json2obj($JSON);
my $XML = $Self->obj2xml($Obj);

json2obj

Takes a json string as input. Returns an equivalent perl data structure.

obj2dom

Takes a perl data structure as input. (Must be a hashref.) Returns an XML::LibXML::Document object.

This method expects the object to be in the same format as would be returned by the xml2obj method.

In short:

  • The root hashref may only have a single hashref key. That key will become the xml document's root.

  • A hashref will be converted to an element.

  • An arraysref of hashrefs will be converted into multiple child elements. Their names will be set to the name of the arrayref's hash key.

  • If an attribute is prefixed by an "@", the "@" will be removed.

  • A hashkey named "$t" will be converted into text content for the current element.

Namespace

  • If a namespace alias has a "$", it will be replaced using ":". For example, ns$element becomes ns:element.

Caveats:

  • The order of child elements and attributes cannot be determined.

obj2xml

This method takes the same arguments as obj2dom. Returns the XML as a string.

CAVEATS

The order of child elements is not always preserved. This is because the conversion to json makes use of hashes in the resulting json.

AUTHOR

Ken Prows - perl(AT)xev.net

COPYRIGHT & LICENSE

Copyright (C) 2007-2008 Ken Prows

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.