use strict; use warnings; use Data::Dumper; # test 1 print for (1..10 or 'a'..'k'); # line 6 print "\n"; # test 2 my @range = 1..10 or 'a'..'k'; # line 10 print for (@range); print "\n"; # test 3 my @r1 = 1..10; my @r2 = 'a'..'k'; @range = @r1 or @r2; # line 17 print for (@range); print "\n";