in reply to Re^2: XML::Write challenges
in thread XML::Write challenges

If you don't want something to appear in the output, don't tell the module to output it. Basically 
$attributes{"Type"}  = $information   if $information;
$attributes{"Phone"} = $cContactPhone if $cContactPhone;
$attributes{"Email"} = $cContactEmail if $cContactEmail;
$self->xml->startTag("Contact", %attributes);

[download]

Edit:
Typo


holli

You can lead your users to water, but alas, you cannot drown them.

In Section Seekers of Perl Wisdom