Shortcut for if(defined($var) && $var ne "") ?

[vikimun]

Is there shorter equivalent of if(defined($var) && $var ne "")
that doesn't fall for the "0" case, and doesn't produce warning with -
w ?

Thanks
V.M.

 

[Johann Kappacher]

Is there shorter equivalent of if(defined($var) && $var ne "")
that doesn't fall for the "0" case, and doesn't produce warning with -
w ?

Thanks
V.M.

Hmm,

if (length $var) ....

--jk

 

[Johann Kappacher]

Sorry,

it will produce warnings if it is not initialized.
If you want to avoid warnings you must use defined().

perl 5.10 introduces the defined-or Operator.
=> This is your solution.

--jk

 

[Johann Kappacher]

Sorry,

it will produce warnings if it is not initialized.
If you want to avoid warnings you must use defined().

perl 5.10 introduces the defined-or Operator.
=> This is your solution.

--jk

.... but no, you need a defined-and operator!
I give up, this exercise is futile!