Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re: Perl: last evaluated value as a returned value for a subroutine. See inside

by moritz (Cardinal)
on Feb 21, 2013 at 17:18 UTC ( #1019988=note: print w/replies, xml ) Need Help??

in reply to Perl: last evaluated value as a returned value for a subroutine. See inside

My question is: are there any conditions when Perl would NOT print "some string" in last two lines of code?

I have trouble making sense of this question.

If you change the code, it might do something differently, depending on how you change it. If you don't change the code, it'll do the same thing each time you execute it.

If the fact that $R is returned surprises you, it might help to know that

unless ($A) { $b }

is actually compiled the same as

$a or $b

(and likewise if ($a) { $b } is compiled the same as $a and $b)

which is why branching constructs as the last statement return the value of the conditional.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1019988]
[jthebarg]: case
[Eily]: :P, the search box is on the top left, or you can use Super Search
[Corion]: jthebarg: There is the switch keyword if you want that, but maybe a dispatch table is closer.
[Corion]: If by "case" you meant "case-insensitive ", see fc, uc and lc and perlop on the /i flag ;)
Corion waves to virtualsue

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (15)
As of 2017-09-26 13:41 GMT
Find Nodes?
    Voting Booth?
    During the recent solar eclipse, I:

    Results (295 votes). Check out past polls.