in reply to Unknown problem, throws "Useless use of privt var in void contxt"

I'd take a look at the line

if ($month => 10)  {

which actually boils down to

if ("$month", 10)  {

since "=>" is the "fat comma" operator, used in defining hashes, whose only distinction from the comma operator is that it ensures its left-hand argument is a string.

I think you meant to say

if ($month >= 10)  {

instead. Not sure why the error appears so far down, but there you are.

Replies are listed 'Best First'.
Re^2: Unknown problem, throws "Useless use of privt var in void contxt"
by halley (Prior) on Jan 22, 2008 at 14:13 UTC
    Your explanation of => is not entirely accurate. 
    if ($month => 10) { ... }

    [download]
    is equivalent to 
    if ($month, 10) { ... }

    [download]
    The => operator does NOT wrap whatever appears on the left into a string. Instead, it allows any expression, but if a bareword is used, it turns the bareword into a string. Any other expression is left as-is, not even coerced into being a string. (Actually rolling a list into a hash will coerce the keys into strings unless the hash has some magic.)

    --
    [ e d @ h a l l e y . c c ]

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom