Note! This site is about Perl 6.
If you are looking for a solution for Perl 5, please check out the Perl 5 tutorial.
As we already seen in a previous chapter we
can use a junction to check if a values is among a given
set of values
tutorial/junctions/intro.p6
#!/usr/bin/env perl6
use v6;
my $possible_options = 1|2|3;
my $c = prompt "please give a number(1,2 or 3): ";
if $c == $possible_options {
say "Correct choice: $c";
} else {
say "Incorrect choice: $c";
}
The Perl 6 Tricks and Treats newsletter has been around for a while.
If you are interested to get special notification when there is new content
on this site, it is the best way to keep track:
This is a newsletter temporarily running on my personal site (szabgab.com) using Mailman,
till I implement an alternative system in Perl 6.
Written by Gabor Szabo