CGI :: Validar

CGI :: Validate es un analizador de formulario de CGI avanzado y validación de tipo.
Descargar ahora

CGI :: Validar Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Byron Brummer
  • Sitio web del editor:
  • http://search.cpan.org/~zenin/CGI-Validate-2.000/Validate.pm

CGI :: Validar Etiquetas


CGI :: Validar Descripción

CGI :: Validar es un analizador de forma de CGI avanzado y validación de tipo. CGI :: Validate es un analizador de formulario de CGI avanzado y validación de tipo.Synopsis Use CGI :: Validate; # Getformdata () solo usa CGI :: Validate QW (: Standard); # Uso normal Use CGI :: Validate QW (: Subs); # SOLO FUNCIONES UTILICE CGI :: Validar QW (: vars); # SOLO EXCCIÓN VARS ## Si no lo desea, verifique que todos los elementos de ## solicitados pueden usarlo. Pero no lo recomiendo en ## para la mayoría de los usuarios. $ CGI :: Validate :: Complete = 0; ## Si no le importa, algunos campos en el formulario, no, en realidad, haga clic en lo que solicitó. -No recomiendo ## Esto, a menos que realmente sepa lo que está haciendo porque esta ## Normalmente Meens tiene Typo's en su HTML y no podemos ## atraparlos si establece esto. ## $ CGI :: Validate :: IgnorenNoNMatchingFields = 1; mi $ fieldone = 'cadena predeterminada'; My $ FieldTwo = 8; My $ fieldThree = 'alguna cadena predeterminada'; mi @fielffour = (); ## para el campo Multi-Select My @fieldFive = (); ## DITTO MY $ EmailAddress = ''; ## intente ... My $ QUERY = getformdata ('' fieldone = s '=> $ fieldone, ## STRING requerido' fieldtwo = i '=> $ fieldtwo, ## INT requerido' fieldThree '=> $ FightThree, ## Auto convertido en ": S" tipo 'fieldfour = s' => @fieldfour, ## Field de STRINGS 'FieldFive = F' => @fieldfive, ## Multi-Select Field of Floats 'Correo electrónico = E' => $ EmailAddress, ## debe "mirar" como una dirección de correo electrónico) o hacer {## captura ... (¿no solo le encantaría una declaración de caso aquí?) Si (% falta) {DIE "Faltando elementos del formulario: ". unirse ('', faltan las teclas%); } Elsif (% no válido) {DIE "elementos de formulario no válidos:". unirse ('', teclas% inválidas); } Elsif (% en blanco) {Die "Formulario en blanco elementos:". Únete ('', teclas% en blanco); } Elsif (% InvalidType) {Die "Tipos de datos no válidos para los campos:". Únase a ('' ', teclas% InvalidType); } else {die "getformdata () excepción: $ CGI :: Validate :: Error"; }}; ## Si solo desea verificar los datos del formulario, pero no quiere ## tener CGI :: Validar Establecer nada Use esto. -Todos aún tienen el acceso completo de ## a los datos a través del objeto B normal que se devuelve. Use CGI :: Validate QW (CheckFormDATA); # no exportado de forma predeterminada My $ Query = CheckFormDATA ('' fieldone = s ',' fieldtwo = i ',' fieldthree ',' fieldfour ',' fieldfive ',' correo electrónico ',) o do {... las mismas excepciones disponibles como Getformdata arriba ...}; ## ¿Necesita ser utilizado algún de su propio código de validación? Aquí es como lo haces. AddExtensionsionsionsionsionsionsionsionsionsionsionsionsions ($ _ _ = ~ / prueba /}, foobar => foobar, i_modify_the_actual_data => sub {si ($ _ = ~ / prueba /) {## Validación de datos $ _ = 'lo que sea'; ## Modificar los datos por alias devuelve 1;} else {return 0;}},); My $ QUERY = getformdata ('foo = xmytype' => $ foo, 'bar = xfoobar' => $ bar, 'cat = xi_modify_the_actual_data' => $ cat,); ## Los cheques de tipo de datos incorporados disponibles son: S cadena # Cualquier valor de longitud no cero W Word # debe tener al menos un valor W char i entero # entero f flotan # flotador valor e correo electrónico # debe coincidir con M / ^ S * Requisitos: · Perl


CGI :: Validar Software relacionado