Hola muchachos, estoy tratando de obtener los valores de un xml que me leo por http, ya se que existe XML::DOM pero no lo puedo usar ya que no tengo permiso de configurar el server, ademas q esta muy sencillo el codigo.
Deseo limpiar todos los tags y solamente leer el contenido: Result y Message, pero me estan comiendo las expresiones regulares.
<?xml version="1.0" encoding="utf-8" ?>
<ProcessVoiceResponse>
<ProcessVoiceRequestResult>Result</ProcessVoiceRequestResult>
<ProcessVoiceRequestMessage>Message</ProcessVoiceRequestMessage>
</ProcessVoiceResponse>
#paso 1
# la idea es quitar los que no me interesen
#$totalfile ya tiene la data cuando uno hace my $res = $ua->request
$totalfile=~ s/<?xml version="1.0" encoding="utf-8"?>//g;
$totalfile=~s/\<ProcessVoiceResponse\>//g;
$totalfile=~s/\</ProcessVoiceResponse\>//g;
Asi deberia quedar solamente:
<ProcessVoiceRequestResult>Result</ProcessVoiceRequestResult>
<ProcessVoiceRequestMessage>Message</ProcessVoiceRequestMessage>
Despues quito:
</ProcessVoiceRequestResult> y </ProcessVoiceRequestMessage>
Quedaria esto:
<ProcessVoiceRequestResult>Result <ProcessVoiceRequestMessage> Message
Haria un split para sustituir <ProcessVoiceRequestResult> por "" y despues hago otro para el <ProcessVoiceRequestResult>
y podria leer con un arreglo los valores Result y Message.
Si tienen una idea mas facil se los agradezco por ahora me conformo con quitar las <sentencia></sentencia>
Gracias