Foro - Perl en Español

Hola, buenas tardes. Por favor, ¿cómo puedo obtener el valor de un input?


<label for="edit-name">Nombres y apellidos del usuario <span class="form-required" title="Este campo es obligatorio.">*</span></label>
<div class = "form-group"><input class="username form-control" type="text" id="edit-name" name="name" value="juan1" size="60" maxlength="60" /></div>
</div>
<div class="form-item form-type-textfield form-item-mail">
<label for="edit-mail">Dirección de correo electrónico <span class="form-required" title="Este campo es obligatorio.">*</span></label>
<div class = "form-group"><input class="form-control" type="text" id="edit-mail" name="mail" value="[email protected]" size="60" maxlength="254" /></div>
</div>
</div><input type="hidden" name="form_build_id" value="form-NP6zF1cjhSs3oz89sxCidX3C_OcNJn6037NlRpKnMa4" /> ...

Hola estimados, tengo la siguiente duda: estoy capturando desde un web service con el siguiente script una respuesta SOAP:
$VAR1 = {
'S:Body' => {
'ns4:SinteIED' => {
'xmlns:ns4' => 'http://ws.iid.sd.eedt.cl/SinteIED',
'xmlns:ns3' => 'http://ws.iid.sd.eedt.cl/Consultar',
'MovimientosCliente' => {
'Movimiento' => [
{
'NOMBRE' => 'ALTIMAS,
'MONTO' => '0.0',
'PAIS_CODIGO' => '522',
'GUIAS' => ,
}
]
},
'xmlns:ns2' => 'http://ws.iid.sd.eedt.cl/MovimientosClienteWS'
}
},
'xmlns:S' => ...

Hola, muy buenas.

He de hacer un reemplazo masivo en unos archivo php, los cuales tienen en su código expresiones regulares, de manera que se me complica y mucho. Pondré un ejemplo básico para ver si se puede hacer lo que quiero, y de ahí intentar abarcar el problema.

Tengo una variable dentro del php que es la que quiero cambiar:

$regexp = '/<div>(.*?)<\/div>/';

y ha de quedar así:

$regexp ...

Buenos días,

Necesito leer un fichero de log en XML (soap.log). De este fichero, necesito:

1. que busque los errores 500: <codigo>-500</codigo>

2. que si encuentra lo anterior se quede con el párrafo que va desde <GBPFault> hasta </GBPFault>

3. que si se cumplen las dos premisas anteriores, que capture como variables el <level>X</level>, el <message>XXXX </message> y el <appname>XXX </appname>.

Además me surge la duda de cómo hacer algún tipo de "marca de agua" ...

Buenas. Estaba mirando un programa que han subido aquí y no entiendo muy bien este trozo de código.

my @orfs = $sequence =~ /(ATG(?:.{3})*?)(TAA|TAG|TGA|.{1,3}$)/g;

Muchas gracias.

Hay un ejercicio que me está rompiendo la paciencia, por la falta de sintaxis y lo enredado que lo veo.

Que reciba dos parámetros: <dir> y <arch>, de modo que devuelva todos los archivos
en <dir> que: son <arch>, son enlaces duros a <arch> o son enlaces simbólicos
directos o indirectos (enlace simbólico a un enlace simbólico) a <arch>.

Soy un usuario básico en este lenguaje, no espero una solución definitiva, seria buenísimo si las ...

Hola.

Me he hecho una función que envía correos. La voy a utilizar para que en caso de que suceda un error en un script me envíe un correo indicándomelo. La función send_mail funciona correctamente.

Mi intención es que si hay un error de lectura/escritura me envíe un correo antes de que muera.

La línea en cuestión es:
open (CSV, $archivo) || &send_mail("Open_fail","Couldn't read $archivo.csv: $!") and die;
El archivo existe, pero ni lo ...

Hola a todos, estoy tratando de reducir el siguiente código para adaptarlo dentro de otro script que tengo en funcionamiento. La idea es leer dos archivos de registro de extensión .fls creados durante la ejecución del script en el cual deseo adaptar el código.

Las líneas que me interesan siempre comienzan por OUTPUT, en estas están las rutas de algunos archivos que deseo mover (o eliminar). Aquí dejo dos ejemplos de los archivos de registro: ...

¿Cómo puedo asignar un número de usuario cuando se registra?

Por ejemplo, en los juegos, que al registrarte te ponen un número de usuario registrado.

Hola, muy buenas. Acabo de empezar con Perl. He conseguido generar un código que vuelca el contenido de un fichero a un hash de hashes (como variable global) y después lo imprime.

Siguiente paso: ahora intento pasar a la función el hash de hashes referenciado (declarado globalmente y vacío). Rellenarlo usando la referencia a memoria, y después imprimirlo.

¿Me puede sugerir cómo acceder al valor referenciado del hash de hashes para modificar su valor y ...