sub sub1 { # ... my $x = ? $y : undef; # ... }