Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

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}

Comment on Re: What does this mean?
Download Code
Replies are listed 'Best First'.
Re^2: What does this mean?
by aaron_baugher (Curate) 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?

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

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (4)
As of 2016-04-29 22:55 GMT
Find Nodes?
    Voting Booth?
    :nehw tseb si esrever ni gnitirW

    Results (441 votes). Check out past polls.