Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic

Re: Name "main::a" used only once: possible typo

by kcott (Bishop)
on Mar 08, 2013 at 08:07 UTC ( #1022351=note: print w/replies, xml ) Need Help??

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

G'day szabgab,

I see you've got explanations for why this is happening. In terms of a workaround, I would probably add $a || $b || 1; after the use List::Util ... line. This would help to indicate why that code was there through association and would also remove the clutter of no warnings ... or our ... from the calls to reduce(). Furthermore, changes to code would not require any additional workaround changes. Here's some examples:

$ perl -Mstrict -Mwarnings -E ' use List::Util qw/reduce/; say reduce { $a * $b } 1..6; ' Name "main::a" used only once: possible typo at -e line 3. Name "main::b" used only once: possible typo at -e line 3. 720
$ perl -Mstrict -Mwarnings -E ' use List::Util qw/reduce/; $a || $b || 1; say reduce { $a * $b } 1..6; ' 720
$ perl -Mstrict -Mwarnings -E ' use List::Util qw/reduce sum/; $a || $b || 1; say reduce { $a * $b } 1..6; say sum 1..6; ' 720 21

-- Ken

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1022351]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (5)
As of 2021-04-21 18:17 GMT
Find Nodes?
    Voting Booth?

    No recent polls found