my ($x, $y, $z) = map { $_ || '' } split; #### my ($x, $y, $z) = map { defined $_ ? $_ : '' } split;