Foro - Perl en Español

Bien ya con la data que me dieron pude leer los archivos que tiene el contenido que necesito reemplazar, ponerlos en un array y listar los archivos sin repetir, lo que tengo es algo así:

#!/usr/bin/perl
#Mando en un array el listado de los archivos que tienen la cadena que busco
#desde la shell de linux le paso la variable $1
my @array=`grep -Re "esto-es-lo-que-busco" $1`;
#Pongo solo los resultados unicos en un nuevo array ...

Hola a todos,

Tengo una duda bastante básica así que supongo que me podréis ayudar:

Tengo un fichero de configuración (FTP.cfg) en el que guardo datos que luego serán usados por un script perl para realizar una conexión FTP para el envío de una serie de ficheros:

Ejemplo de un "cat FTP.cfg":

Code: Seleccionar todo

user = pepito
password = frijolito
host = Gavilan
path = /pepito/juanito/


El hecho es que tengo un script perl que parsea ...

Necesito buscar dentro de un array una cadena y extraer los valores únicos de ese array, es decir tengo una array así:
@pepe = ('hola','chau','lindo','feo','hola','feo','hola','lindo','dia','dia')

Necesito extraer sólo los valores únicos. ¿Cómo podría hacerlo?

Hola aquí estoy con un nuevo desafío, a ver si me podéis echar una manilla.

Necesito hacer un programa que lea unos datos de una base de datos y envíe un mensaje a un teléfono móvil. En concreto, debe estar en un bucle siempre buscando en la tabla 'SOS' si hay algún registro con el campo 'procesado = 0', si es así, saco los campos 'uid', 'fecha' y 'hora' y tengo que mandar un mensaje ...

Buen día... cómo les va.. hace mucho que no posteo nada....

Acudo a ustedes para preguntarle si alguno tiene alguna solución para el problema de spam en los foros Perl, supongo que es un problema normal... y la solución debe ser muy simple...

Si alguien me da una mano, me ayudaría mucho...

Muchísimas gracias

iojis

Hola, una pregunta; abro un documento en procesador de texto y no aparece nada pero lo veo por VI y aparece el caracter ^@, lo cual hace que truene mi programa, como lo puedo eliminar por medio de Perl.

Por su ayuda muchas gracias de antemano.

Hola a todos

Estoy intentando redirigir la salida de un comando llamado desde la función system a un fichero

system("\"C:\\ejecucion.exe\" > \"C:\\Program Files\\salida.txt\"");

y el problema lo tenemos en que no reconoce el espacio entre "Program" y "Files" del fichero de salida.

¿Alguien sabe cómo hacerlo? Ya he probado estas combinaciones y ninguna es válida:

Code: Seleccionar todo

'C:/Program/Files/salida.txt'
\"C:\\Program\ Files\\salida.txt\"
"C:\\Program Files\\salida.txt"
'C:\\Program\ Files\\salida.txt'
'C:\\Program\" \"Files\\salida.txt'

fich="C:\\Program Files\\salida.txt"
system("\"C:\\ejecucion.exe\" > $fich)
system("\"C:\\ejecucion.exe\" > "$fich")

En fin, una ...

my $cent = 0.01;
my $total = 0.0;
print "Total $total\n";
for ( my $i = 0; $i < 1000; $i++){
$total += $cent;
}
print "Ahora tengo $total y deberia ser 1o\n";
:? Y no es el unico lenguaje: C#, Java, COBOL y otros.

Quiero sacar la parte entera de un número... por ejemplo si tengo 8.544 que me dé como resultado 8.
Muchas gracias

Hola

Estoy configurando un server para monitorear mi red con MRTG; ya tengo ciertas estadísticas construidas tales como: uso de cpu, procesos, tráfico de clientes en la red, router... y mi pregunta es cómo podría obtener información del switch... debido a que todos con los que he ido trabajando tiene IP's... también agradecería su apoyo en estadísticas de NIC, agradezco su apoyo de antemano.