Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
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 romping around the Monastery: (11)
As of 2014-09-22 12:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (191 votes), past polls