(Perl) Update an XML Attribute

Demonstrates how to update XML attributes.

The output XML is this:

<abc b="pear" c="orange" a="130">Test</abc>

Chilkat Perl Downloads Perl Module for Windows, MacOS, Linux, Alpine Linux, Solaris

use chilkat();

$xml = chilkat::CkXml->new();

$success = $xml->LoadXml("<abc a=\"123\" b=\"apple\">Test</abc>");

# The UpdateAttribute and AddOrUpdateAttribute methods
# are identical.  Both will replace the attribute's value if it
# already exists, or insert a new attribute if it does not yet exist.

# Change the value of attribute "b" to "pear".
$success = $xml->UpdateAttribute("b","pear");

# Because no attribute named "c" exists, UpdateAttribute
# will create it:
$success = $xml->UpdateAttribute("c","orange");

# If an attribute's value is an integer, the AddToAttribute
# method may be called to update it by adding an integer value.
# For example, update the value of "a" to "130" by adding 7.
$xml->AddToAttribute("a",7);

# Examine the result:
print $xml->getXml() . "\r\n";