Hi!
Me he dado cuenta de que mi nivel en Perl es bajísimo y no me da vergüenza decirlo.
Ya posteé éste en Intermedio pero necesito un script básico en Perl, para convertir esta URL
http://www.bullcariez.es/index1.php?id= ... ,2,3,4,5,6
a esta
http://www.bullcariez.es/index1.php?id=
terminando la URL en ?id=
Disculpa y adiós.
-
- Publicidad
Convertir URL a otra
2 mensajes
• Página 1 de 1
Convertir URL a otra
por BigBear » 2009-06-26 18:38 @818
- BigBear
- Perlero frecuente
- Mensajes: 981
- Registrado: 2009-03-01 18:39 @818
Publicidad
por explorer » 2009-06-26 18:58 @832
Using perl Syntax Highlighting
#!/usr/bin/perl
my $url = 'http://www.bullcariez.es/index1.php?id=-1+union+select+1,2,3,4,5,6 ';
$url =~ s/([&?]id=).*$/$1/;
print "$url\n";
my $url = 'http://www.bullcariez.es/index1.php?id=-1+union+select+1,2,3,4,5,6 ';
$url =~ s/([&?]id=).*$/$1/;
print "$url\n";
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
No es mucho más complicado... a la $url le pasamos por un operador de sustitución, que lo que hace es quitar todo lo que sigue a id=. Bueno, más bien lo que hace es buscar id=, lo guarda en $1 (gracias a los paréntesis de captura), y junto con lo demás (.*), hasta el final ($), es sustituido todo por el valor de $1 (el id= junto con el carácter especial que le precede, que no sabemos cuál puede ser, de estos dos: '&' y '?').
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
2 mensajes
• Página 1 de 1
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 23 invitados