Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re^4: Perl bug ?

by vsespb (Hermit)
on Feb 06, 2013 at 12:36 UTC ( #1017408=note: print w/ replies, xml ) Need Help??


in reply to Re^3: Perl bug ?
in thread Perl bug ?

Why I have

[[[ARRAY(0x137cd48)]]] [[[some text 1 ]]]
then ? First argument should be true only if $errors->[0] contains string /Journal file not found/ no ?


Comment on Re^4: Perl bug ?
Download Code
Re^5: Perl bug ?
by tinita (Parson) on Feb 06, 2013 at 12:48 UTC
    like I said. the first argument passed to ok() is $errors && ($errors->[0] =~ /.../i). what gets really passed is $errors. it's like saying: my @foo = $errors && ($errors->[0] =~ /.../i)
    the pattern match isn't executed at all at the first time. but after processing the first argument, you use $errors->[0] in your second argument. now $errors is autovivified to an array ref before ok() is actyally executed. since $errors is passed as the first argument as an alias, it prints ARRAY(0x137cd48)
      what gets really passed is $errors
      Why? I would expect the result of the && operation to be passed.
      لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
        I would expect the result of the && operation to be passed.
        yes, and the result of something_false && something is something_false. the second part is never processed.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1017408]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (13)
As of 2014-08-29 13:00 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (280 votes), past polls