Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re: Re: no warnings 'uninitialized' (was:Time to seconds)

by blakem (Monsignor)
on Nov 16, 2001 at 16:25 UTC ( #125805=note: print w/replies, xml ) Need Help??

in reply to Re: no warnings 'uninitialized' (was:Time to seconds)
in thread Time to seconds

It's not weird its perlish.TM ;-)
But seriously, using "uninitialized" variables is done all the time in perl. The weird part is trying to figure out when doing so will trigger a warning and when it won't. I'll be very impressed if you can tell what warnings the following code will produce:
#!/usr/bin/perl -T use warnings; use strict; my ($a,$b,$c,$d,$e,$f,$g,$h,$i,$j,$k,$l,$m); $a++; $b += 1; $c = $c + 1; $d->{size} = 'big'; $e->[5] = 35; $_ .= "$f"; $_ .= $g; $_ = 'h=' . $h; $_ = $i . '=i'; $_ = "j=$j"; $_ = "$k=k"; $_ = $l x 5; $_ = "$m" x 5;

ANS: $c,$f,$g,$h,$j, and $m are used it ways that trigger warnings $a++; # this is ok $b += 1; # this is ok $c = $c + 1; # but this is bad??? $d->{size} = 'big'; # both are just fine... treating undef as a hash + ref $e->[5] = 35; # is ok, but treat it like a 0 and I get yelled +at? $_ .= "$f"; # bad $_ .= $g; # still bad $_ = 'h=' . $h; # bad.... ok so you can't treat undef like a string $_ = $i . '=i'; # wait, no warning, maybe you can $_ = "j=$j"; # nope this tosses an error $_ = "$k=k"; # but this doesn't.... huh? $_ = $l x 5; # neither does this $_ = "$m" x 5; # but if I do the stringifing myself I get yelled at

So, how did you do? I contend that you would have scored better on this quiz if I had asked about the values of the expressions rather than about the warnnings they may or may not trigger.

Learning how undef behaves is easy... learning when it tosses warnings is hard. This can lead to gratuitious special-casing (i.e. if ($x && $x > 3) {$y = ($z||0) + 5)) whose sole purpose is to explicitly state that undef should be treated like, well, undef!


Replies are listed 'Best First'.
Re: Re: Re: no warnings 'uninitialized' (was:Time to seconds)
by Anonymous Monk on Nov 16, 2001 at 23:03 UTC
    All these has their more or less intuitive explanations except for the $i and $k examples, and possibly also the $1 example. I believe you did this test on ActivePerl which is unfortunate since ActivePerl is broken. Try that on coreperl and you'll see that the $i and $k examples too will emit warnings--just as they should.
      Ah, so here is another reason to turn off that warning... different perls complain about different things. The original answers were from a unix 5.6.1 perl, but testing it against 5.005_03 on the same machine shows that $i and $k trip warnings as you noted. (of course turning off warnings prior to 5.6.0 is a bit of a pain....)


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://125805]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (8)
As of 2018-04-23 14:29 GMT
Find Nodes?
    Voting Booth?