Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: What does this mean?

by linuxkid (Sexton)
on Aug 20, 2012 at 21:00 UTC ( #988510=note: print w/ replies, xml ) Need Help??


in reply to What does this mean?

if ya want it even shorter, try $self->{_id} = defined($id) ? $id : $self->{_id}

--linuxkid


imrunningoutofideas.co.cc


Comment on Re: What does this mean?
Download Code
Re^2: What does this mean?
by aaron_baugher (Deacon) on Aug 20, 2012 at 22:53 UTC

    If by "shorter," you mean 14 characters longer, then absolutely.

    Aaron B.
    Available for small or large Perl jobs; see my home node.

Re^2: What does this mean?
by Anonymous Monk on Aug 21, 2012 at 07:04 UTC
    defined $id and $$self{_id} = $id; or with newer perls $$self{_id} //= $id;
      $$self{_id} //= $id; checks the definedness of $$self{_id}, not of $id (as the other suggested snippets do), so it does something completely different (never reset the attribute, instead of prevent assignment of an undefined id).

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (6)
As of 2014-07-29 01:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (211 votes), past polls