Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

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

by kcott (Canon)
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]
[Corion]: A good daypart!
Corion feels slightly bad for initiating a discussion yesterday and then running away. I guess I should write that up as a meditation or SoPW
[Corion]: Not the "running away" part but the question+ discussion about IO-less HTTP modules
[Corion]: (or how/where to patch AnyEvent::HTTP or LWP::UserAgent to take control of both the callstack and the data transfer)

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (5)
As of 2016-12-08 09:03 GMT
Find Nodes?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:

    Results (137 votes). Check out past polls.