Foro - Perl en Español

Hola a todos.
Tengo un problemilla con un XML que tiene la siguiente estructura:

<perfil>
<miniPerfil tipo='a'>
<campo1> </campo1>
<campo2> </campo2>
</miniPerfil >
<miniPerfil tipo='b'>
<campo3> </campo3>
<campo4> </campo4>
<campo5> </campo5>
</miniPerfil>
</perfil>

Lo que quiero hacer es sacar cada "miniPerfil" (a,b.....) a un fichero. Es decir crear "a.xml" con los datos campo1 y campo2 "b.xml" con los datos campo3, campo4 y campo5.

Estoy usando XML::Simple pero al hacer XMLIn('ficheroXML_original') me da el siguiente error... ...

Saludos, con una consulta. ¿Existe algún comando para obtener el nombre del usuario con el que se está ejecutando un programa en Linux desde Perl?

Hola.

Tengo que controlar el estado de los discos de unos servidores Fujitsu Primergy y lo puedo hacer con SNMP (con snmpwalk). He hecho un programilla que en sí funciona pero me falta la guinda :-)

Aquí está el código:#!/usr/bin/perl
#===============================================================================
#
# FILE: check-fs-array.pl
#
# USAGE: ./check-fs-array.pl
#
# DESCRIPTION: check disk array controller health through SNMP
#
# OPTIONS: ---
# REQUIREMENTS: snmputils (snmpwalk, ...

Hola,

Sólo deseo saber el significado de
next if 1 .. /^No/;


Gracias.

¿Puedo con Perl crear una página como www.globalmarket. com o www.madeinchina. com?

Hola,
resulta que me he quedado un poco atascado en una opción. Necesito escribir en una zona determinada de un fichero, pero sólo sé modificar sobreescribiendo o añadiendo datos al final del fichero.

Me gustaría saber cómo colocarme en una determinada línea, y dentro de esa línea ubicarme tras el 4º campo del fichero passwd.

Saludos y muchas gracias.

Saludos a todos.

Amigos, tengo un problema que no sé cómo atacar. Tengo un script en Perl que deberá recibir un parámetro de la forma:

Code: Seleccionar todo

[[string_alfanumerico][string_inicial.XXXXXXX.string_final][string_o_numero]]

Aplicando regexp, obtengo en una variable $var esto:

Code: Seleccionar todo

string_inicial.XXXXXXX.string_final

Donde XXXXXXX puede ser uno o más strings separados por "." (un punto).

Lo que yo necesito hacer con Perl es poder obtener estos distintos strings en un array.

Lo que pude hacer es contar cuántos strings hay separados por "." en ...

Hola.
Necesito saber cómo se hace para cambiar en un texto solo las palabras que empiecen con vocal.

Gracias.

Hola.

Necesito crear un programa que permita cambiar el fichero de usuarios por defecto, es decir, en vez de ser /etc/passwd sea otro que yo introduzca al ejecutar el programa de Perl con la opción -p; el problema lo encuentro en que no sé cambiar el fichero por defecto.

De igual modo debo hacer con el fichero grupo con la opción -o.

Saludos y muchas gracias.

Hola, ¿cómo están?

Por favor, ayúdenme. Estoy con Fedora 7. Necesito hacer una aplicación web con Perl y MySQL. Tengo toda la interfaz en HTML pero no sé cómo hacer la conexión primeramente.
Tengo instalado el Apache v2.0 y la interfaz HTML sí me corre desde la carpeta (/var/www/html/paginaweb); ahí me corre la aplicación (/localhost/paginaweb/index.html)
pero ahora necesito hacer la conexión y tengo muchas dudas, no sé si está bien en donde tengo el proyecto; ...