Página 1 de 1

Validar contra un set de valores

NotaPublicado: 2020-09-30 04:48 @242
por silva
¿Cómo puedo validar en Perl que el valor de una variable está dentro de un conjunto posible de valores?

Posibles valores: 'AB' or 'BC' or 'TO'

if my $variable eq ('AB' or 'BC' or 'TO') { # ¿ES posible ?

}

¡Gracias!

Re: Validar contra un set de valores

NotaPublicado: 2020-09-30 05:50 @284
por MaterazziSan
Buenas,

Si lo que quieres es validar que la variable contenga unos de esas subcadenas siempre puedes usar la función index() (https://perldoc.pl/functions/index) o expresiones regulares.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. #!/usr/bin/perl
  2.  
  3. use strict;
  4. use warnings;
  5. use v5.28.1;
  6.  
  7. my $variable = 'ABBA';
  8. if($variable =~ 'AB') {
  9.         say 'si';
  10. } else {
  11.         say 'no';
  12. }
  13.  
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4

El ejemplo anterior mostrara "si" por pantalla dado que 'ABBA' contiene el substring 'AB'.

Si estamos hablando de la estructura de datos conocida como Set, siempre puedes usar este módulo de CPAN Set::Scalar