Perl

Update an XML Attribute

See more XML Examples

Demonstrates how to update XML attributes.

The output XML is this:

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

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

my $xml = Chilkat2::Xml->new;

my $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(), "\n";