#!/usr/bin/perl use strict; use warnings; # this is the range operator used in list context ... it returns numbers 1 to 27 for my $i (1 .. 27) { # .. range operator used in scalar context returns a boolean value # It is false as long as the left operand is false # Once the left operand is true, the range operator remains true until the right operand is true # The operator doesn't become false until the next time it is evaluated # there is also a ... operator which behaves slightly different, i will spare us that one for now print "$i\n" if ( ($i%7==0) .. ($i%5==0) ) # 1 false false = false # 2 false false = false # 3 false false = false # 4 false false = false # 5 false true = false # 6 false false = false # 7 true false = true # 8 false false = true # 9 false false = true # 10 false true = true # 11 false false = false # 12 false false = false # 13 false false = false # 14 true false = true # 15 false true = true # 16 false false = false # 18 false false = false # 19 false false = false # 20 false true = false # 21 true false = true # 22 false false = true # 23 false false = true # 24 false false = true # 25 false true = true # 26 false false = false # 27 false false = false }