OK.
¿Y cómo podría recoger los dos valores que te he dicho en el comentario anterior?
Gracias.
-
- Publicidad
Extraer de cadena de caracteres
15 mensajes
• Página 2 de 2 • 1, 2
Re: Extraer de cadena de caracteres
por aindergm » 2012-06-27 09:36 @442
- aindergm
- Perlero nuevo
- Mensajes: 17
- Registrado: 2012-05-16 11:03 @502
Publicidad
Re: Extraer de cadena de caracteres
por explorer » 2012-06-27 14:52 @661
Si el argumento que le pasas a pruebaPerl.pl es correcto, la expresión regular cazará esos dos valores, y los tendrás en las variables $IP y $out.
Si el print() de la línea 7 no saca nada, es que el argumento no contiene lo esperado.
Si el print() de la línea 7 no saca nada, es que el argumento no contiene lo esperado.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
Re: Extraer de cadena de caracteres
por aindergm » 2012-06-29 04:34 @232
He realizado una prueba para asegurarme de que la dirección llega correctamente, para eso he creado dos ficheros Perl:
principal.pl
perlPrueba.pl
Si hago esto puedo ver la salida '$dirData' es la misma que la que se envía, pero no recoge los valores de '$ID' y '$out'
Por lo que estoy seguro que se envía correctamente, pero luego no me guarda los valores.
Gracias
principal.pl
- #!/usr/bin/perl
- $dirPerl='C:/Users/Gordoa/Documents/UNI/4ºCurso/ProyectoFinGrado/Perl/archivosPerl';
- $dirComplete='C:/Users/Gordoa/Documents/UNI/4ºCurso/ProyectoFinGrado/server/public_html/AndroidDataMining/iLogand/ID-357841036752224/com.android.launcher_280.out';
- my $response = `perl $dirPerl/perlPrueba.pl $dirComplete`;
- print("$response\n");
perlPrueba.pl
- #!/usr/bin/perl
- $dirData = $ARGV[0];
- my($ID, $out) = $dirData =~ m/\\ID-(\d+)\\(.+?)_/;
- print "[$ID][$out]\n";
- print("$dirData\n");
Si hago esto puedo ver la salida '$dirData' es la misma que la que se envía, pero no recoge los valores de '$ID' y '$out'
Por lo que estoy seguro que se envía correctamente, pero luego no me guarda los valores.
Gracias
- aindergm
- Perlero nuevo
- Mensajes: 17
- Registrado: 2012-05-16 11:03 @502
Re: Extraer de cadena de caracteres
por explorer » 2012-06-29 05:36 @275
Claro, porque en $dirComplete estás usando barras diagonales normales ('/'), mientras que la expresión regular está esperando barras diagonales invertidas ('\'), porque es lo que habías mostrado en el primer mensaje de este hilo.
Prueba con esta:
O, si no sabes si vas a usar un estilo u otro:
Prueba con esta:
Using perl Syntax Highlighting
O, si no sabes si vas a usar un estilo u otro:
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
Re: Extraer de cadena de caracteres
por aindergm » 2012-06-29 06:16 @303
Ya he conseguido que funcione.
¡¡Muchas gracias por toda la ayuda que me has dado!!
¡¡¡Gracias!!!
¡¡Muchas gracias por toda la ayuda que me has dado!!
¡¡¡Gracias!!!
- aindergm
- Perlero nuevo
- Mensajes: 17
- Registrado: 2012-05-16 11:03 @502
15 mensajes
• Página 2 de 2 • 1, 2
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados