| TIE :: Afectionar Aplica las restricciones en los contenidos de las variables |
Descargar ahora |
TIE :: Afectionar Clasificación y resumen
- Licencia:
- Perl Artistic License
- Nombre del editor:
- Paul Golds
- Sitio web del editor:
- http://search.cpan.org/~molt/
TIE :: Afectionar Etiquetas
TIE :: Afectionar Descripción
Aplica las restricciones en los contenidos de las variables. TIET :: Assert es un módulo Perl diseñado para llenar el nicho cuando los desarrolladores de Perl deben garantizar que una variable obedece ciertas reglas en todo momento, los tiempos en que los usuarios de otros idiomas confiarían en afirmación () y la revisión de tipo. Este módulo está destinado Para ser lo más flexible posible, lo que permite que el desarrollador lo use para hacer las cosas tan básicas que garantizar una variable es numérica y muriendo con un mensaje de error, si no, para garantizar una cadena contiene un número de cuenta válido y existente, y envíe un soporte por correo. Cuenta Si alguna vez es inválida. La flexibilidad es el objetivo principal aquí, este módulo es útil para hacer ejercicio en el que la configuración de un programa son valores no válidos, para proporcionar un cierto nivel agregado de seguridad al garantizar que las variables no se puedan cambiar a valores fuera de rango. .A pesar de que un valor tiene que permanecer dentro de un rango en particular, este módulo podría ser útilmente útil. Hsphnopsis # ate algunos escalares ... My $ ADN; TIE ($ ADN, 'Tie :: Assert :: Scalar', secuencecheck => Lazo :: Assert :: CheckFactory-> Regex (QR / ^ * $ / i),); $ dna = 'gattaca'; # Bien, coincide con el regex. $ dna = 'wibble'; # No coincide con la regex, causará un error. My $ porcentage_score; Lazo ($ porcentaje_score, 'Tie :: Assert :: Scalar', Rangecheck => Lazo :: Assert :: CheckFactory-> Rango (0 => 100),); $ porcentage_score = 23; # Bien, bien dentro del rango proporcionado. $ porcentage_score = 201; # Una puntuación porcentual no válida, más errores. My $ positivo_integer; TIE ($ positivo_integger, 'Tie :: Assert :: Scalar', Positivecheck => Lazo :: Assert :: CheckFactory-> Min (0), IntegergerCheck => Lazo :: Assert :: CheckFactory-> Integer_OK (),); $ positivo_number = 23; # Un número positivo válido $ positivo_number = -1; # Inválido, otro error. Requisitos: · Perl
TIE :: Afectionar Software relacionado