sub _view_xml {
  my $self = shift;
  my $xml = XMLin( "ttscall1.xml" );
  print Dumper $xml;
  my $xml = XMLout( $xml, Rootname => 'campaign' );
  print $xml;
  
  return $xml;
}


##</code><code>##

<campaign menuid="10118-2" action="0" >
 <phonenumbers >
  <phonenumber number="4167781583" callid="1234abc" >
    <prompts>
      <prompt promptid="2" tts="Hello, this is a test." />
    </prompts >
  </phonenumber>
 </phonenumbers>
</campaign>


##</code><code>##

$VAR1 = {
  'menuid' => '10118-2',
  'action' => '0',
  'phonenumbers' => {
    'phonenumber' => {
      'number' => '4167781583',
      'prompts' => {
        'prompt' => {
          'tts' => 'Hello, this is a test.',
          'promptid' => '2'
        }
      },
      'callid' => '1234abc'
    }
  }
};


##</code><code>##

<campaign action="0" menuid="10118-2">
  <phonenumbers name="phonenumber" callid="1234abc" number="4167781583">
    <prompts name="prompt" promptid="2" tts="Hello, this is a test." />
  </phonenumbers>
</campaign>


##</code><code>##

<?xml version="1.0"?><campaign errorid="16" comment="XML parse error: PHONENUMBER tag missing or misplaced." />