Note! This site is about Perl 6.
If you are looking for a solution for the current production version of Perl 5, please check out
the Perl 5 tutorial.
tutorial/scalars/chained_comparison.p6
#!/usr/bin/env perl6
use v6;
my $a = prompt "Type in a number between 23 and 42: ";
if 23 <= $a and $a <= 42 {
say "Good, $a is in the range.";
} else {
say "Did I say between 23 and 42 ?";
}
# you can also compare like this
if 23 <= $a <= 42 {
say "Good, $a is in the range.";
} else {
say "Did I say between 23 and 42 ?";
}
my $small = prompt "Type another number between 0 and $a: ";
my $big = prompt "Type another number between $a and 100: ";
if 0 <= $small <= $a <= $big <= 100 {
say "good";
} else {
say "something is fishy";
}
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