Re^3: Access a global variable from a subroutine when used as "for" iterator

Select or download this

my @array = (1 .. 5);
my $arrayRef = \@array;

say "$arrayRef: @$arrayRef";

Select or download this

my @array = (1, 2, 3, 4, 5);
my $count = (1, 2, 3, 4, 5);

say "$count: @array";

Select or download this

Useless use of a constant (2) in void context at D:\Scratch~~\PerlScra
+tch\noname.pl line 6.
Useless use of a constant (3) in void context at D:\Scratch~~\PerlScra
+tch\noname.pl line 6.
Useless use of a constant (4) in void context at D:\Scratch~~\PerlScra
+tch\noname.pl line 6.
5: 1 2 3 4 5

Select Code to Download