in reply to What does this mean?

You could have written it this way:

if (defined($id)) { $self->{_id} = $id; }
... but this way's shorter. Perl is full of little "shortcuts" like that.