http://www.perlmonks.org?node_id=1022796


in reply to Re: Name "main::a" used only once: possible typo
in thread Name "main::a" used only once: possible typo

Perhaps because it produces the incorrect result and 8 more warning messages: 
#!/usr/bin/env perl

use warnings;
use strict;

use List::Util qw/reduce/;
print reduce { $_[0] * $_[1] } 1..6; 

__END__

Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
Use of uninitialized value in multiplication (*) at x.pl line 7.
0

[download]

In Section Seekers of Perl Wisdom