• Publicidad

Pregunta anti-spam

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Pregunta anti-spam

Notapor Kraven » 2007-03-13 12:25 @559

Como les va, todavía sigo con mi problema de spam. Ahora estoy haciendo que el formulario sea enviado sólo si la respuesta es supongamos, PEDRO.
Pero no sé cómo escribir esa parte. Tengo sólo esto:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
if ($FORM{'resp'}) {
      $name = "$FORM{'resp'}";
      $name =~ s/"//g;
      $name =~ s/<//g;
      $name =~ s/>//g;
      $name =~ s/\&//g;
   } else { &error(no_resp); }
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4

Pero esto sólo estaría diciendo que no acepta esos caracteres pero sí acepta todas las palabras. Yo quiero que SÓLO ACEPTE la palabra PEDRO.

Muchas Gracias desde ya.
Kraven
Perlero nuevo
Perlero nuevo
 
Mensajes: 6
Registrado: 2007-02-25 18:18 @804

Publicidad

Notapor explorer » 2007-03-13 12:36 @566

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
if ( $FORM{resp} eq 'PEDRO' ) {
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor Kraven » 2007-03-13 13:10 @590

MIL GRACIAS... el sistema ya esta funcionando perfectamente. Falta ultimar algunos detalles y listo.

Muchisimas Gracias.
Kraven
Perlero nuevo
Perlero nuevo
 
Mensajes: 6
Registrado: 2007-02-25 18:18 @804


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados

cron