Foro - Perl en Español

Hola.

Bueno, no supe muy bien qué poner de título, así que me disculpan.

El problema que tengo es el siguiente: leo un archivo CSV línea a línea y con split(/\,+/,$archivo lo voy guardando en un arreglo pero sucede que tiene valores que están vacíos, o sea:

78317,1970,01,01,1,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,0,0,0,0,0,0,0,0,0,,,,,,,,,,,,,,,,,

Esos que están (no están) entre comas, vacíos, necesito guardarlos también y que en el arreglo me los ponga como -no data-, pero la función split() sencillamente ...

Estimados, tengo el siguiente problema:

Estoy leyendo un archivo Excel con Spreadsheet::XLSX para insertar sus filas en una BD. El archivo tiene alrededor de 1100 líneas y al parecer es por la cantidad de líneas que el script se detiene antes de terminar y no inserta nada (estoy ejecutando desde un terminal como perl xxxx.pl xxxxx.xlsx). Digo lo de la cantidad de líneas ya que si dejo el archivo Excel solo en 100 líneas las ...

Hola.

Estoy trabajando en un script que me lee varios ficheros con decenas de valores de variables meteorológicas para después guardarlos en un xml.

Mi cuestión es si es posible cada vez que comienzo a leer un fichero diferente, tener las variables escalares (las que uso en Perl para trabajar mi fichero) vacías, pues me he dado cuenta que muchas veces (no siempre y no sé por qué) me arrastra valores del fichero anterior.

Lo ...

Estimados, buenas tardes.

Me estoy interiorizando de a poco en este lenguaje, he leído alguno de sus mensajes de ustedes buscando alguna ayuda a mi problema...

Básicamente lo que necesito hacer es leer un fichero CSV, que lo recorra completo y que guarde los datos en un archivo Excel.

Agradecería desde ya me pudieran compartir un ejemplo a fin de modificarlo a mis necesidades.

Desde ya, ¡gracias!

¡Saludos! ...

Tengo el siguiente script. Lee un archivo llamado 'log.log' y extrae datos según se cumpla la regex.


use Fcntl;
use bytes;

my $ruta = qw(/home/USER/);

my $archivo = "log.log";

my $regex_joinfile = '^\\(\\s+)\\(\\s+)Join(\\s+)(.*)(\\s+)\\((.*)@(.*)\\)(.*)$';

my $match = 0;

my $regs = 0;

open my $p, sprintf("<%s/%s", $ruta, $archivo);

open my $q, sprintf(">%s/%s", $ruta, "index.bin");

binmode $q;

my %hash_ips;


while (<$p>)
{
chomp $p;

if ($_ =~ $regex_joinfile)
{
my $seekpoint = toId($9);

seek $q, ...

Saludos, comunidad.

Por favor, si pueden darme una ayuda.

Necesito una expresión regular que extraiga el dominio de una cuenta de correo.

Ejemplo, si tengo las siguientes cuentas

@vec = ( '[email protected]', '[email protected]', '[email protected]', '[email protected]' );

que me extraiga el dominio. El resultado debería ser:

midominio.com
otro.com
gmail.com.py
ultra.es

Por favor, si pueden ayudarme. Estoy ...

Hola, soy nueva en Perl y quería saber si me pueden ayudar.

Tengo dos archivos y tengo que buscar coincidencias entre ambos en las columnas correspondientes a año, mes, día y hora, y luego si hay coincidencias entre ellos me imprima en un tercer archivo algunas columnas de esas líneas y si no existen similitudes me imprima los datos en un cuarto archivo.

Mi problema es que si las fechas y horas no están ubicadas ...

Buenos días.

Sigo inmerso en mi proyecto web y hoy acabo de darme cuenta de un error bastante grave. Hasta ahora iba programando todo desde un dispositivo y sin problemas. Hoy estoy mirando el tema de la adaptabilidad web y he ido a acceder desde mi dispositivo móvil.

He estado navegando unos momentos desde los dos dispositivos pero enseguida deja de funcionar. Se queda pensando hasta que se acaba colgando...

Puedo insertar los mensajes de ...

Buenos días.

Primero de todo, gracias por toda la ayuda que ofrecéis y la de problemas que me habéis solucionado.

Soy un total novato en el mundo de Perl (algo he hecho pero aún me encuentro en fase de aprendizaje).

La cuestión, no sabía cómo plantear la pregunta, porque no le encuentro ningún sentido.

Tengo una web con formularios donde los envío a Perl mediante Ajax.

El código de JQuery es el siguiente:
...

Buenos días, Foro de Perl.

Comunidad: les solicito su ayuda.

Tengo el siguiente problema. Tengo un log grande, pero recorté únicamente las líneas con las que estuve haciendo la prueba.

El tema es que no consigo obtener los valores que necesito, únicamente haciéndolo por separado.

El log es el siguiente:
Aug 25 15:50:05 casamx-server1 microsoft-windows-security-auditing 4660 An object was deleted.Subject:Security ID:S-1-5-21-4082760969-1594227233-3128182536-500Account Name:AdministratorAccount Domain:casaLogon ID:0xa0574Object:Object Server:SecurityHandle ID:0x124cProcess Information:Process ID:0x1918Process Name:C:\Windows\explorer.exeTransaction ID:{00000000-0000-0000-0000-000000000000}
Aug 25 15:50:05 casamx-server1 microsoft-windows-security-auditing ...