Re: Use of uninitialized value warnings

2011-06-06 Thread Uri Guttman
> "CN" == Chris Nehren writes: CN> On Wed, Jun 01, 2011 at 12:00:36 -0400 , Uri Guttman wrote: >> also the use of // for defined or is relatively recent in perl. be >> careful when using it as it may not work in the version you have >> installed or in production. CN> Relatively rec

Re: Use of uninitialized value warnings

2011-06-06 Thread Chris Nehren
On Wed, Jun 01, 2011 at 12:00:36 -0400 , Uri Guttman wrote: > also the use of // for defined or is relatively recent in perl. be > careful when using it as it may not work in the version you have > installed or in production. Relatively recent meaning 3.5 years old, and released in a version of pe

Re: Use of uninitialized value warnings

2011-06-01 Thread Uri Guttman
> "aa" == am0c am0c writes: aa> If you use aa> $log = $log || ''; that should be $log ||= '' ; aa> instead of aa> $log = defined $log ? $log : ''; aa> It might yield a problem because when $log is "0" it is defined but aa> false in boolean context. aa> The correct shorte

Re: Use of uninitialized value warnings

2011-06-01 Thread am0c am0c
If you use $log = $log || ''; instead of $log = defined $log ? $log : ''; It might yield a problem because when $log is "0" it is defined but false in boolean context. The correct shorter version is: $log = $log // ''; And in the line 696: > 696 my ($log, $pass) = $main::global->{login

Re: Use of uninitialized value warnings

2011-05-31 Thread sono-io
On May 31, 2011, at 9:54 AM, Jim Gibson wrote: > $log and $pass are ASSIGNED in line 696, but they are apparently being > assigned an undefined value (undef in Perl-speak). Thanks a million, Jim. You were absolutely correct. I didn't stop to think about the variable result being undefi

Re: Use of uninitialized value warnings

2011-05-31 Thread Jim Gibson
On 5/31/11 Tue May 31, 2011 9:32 AM, "sono...@fannullone.us" scribbled: > Good Morning, > > I could use some help figuring out where a warning is coming from. > > My shopping cart script has the following sub: > > 695 sub get_ud { > 696 my ($log, $pass) = $main::global->{login} ? > ($main::g

Use of uninitialized value warnings

2011-05-31 Thread sono-io
Good Morning, I could use some help figuring out where a warning is coming from. My shopping cart script has the following sub: 695 sub get_ud { 696 my ($log, $pass) = $main::global->{login} ? ($main::global->{form}->{'userlogin'}, $main::global->{form}->{'userpass'}) : ();