##
my @array = (1, 2, 3, 4, 5);
my $count = (1, 2, 3, 4, 5);
say "$count: @array";
####
Useless use of a constant (2) in void context at D:\Scratch~~\PerlScratch\noname.pl line 6.
Useless use of a constant (3) in void context at D:\Scratch~~\PerlScratch\noname.pl line 6.
Useless use of a constant (4) in void context at D:\Scratch~~\PerlScratch\noname.pl line 6.
5: 1 2 3 4 5