Help for this page
my $y = 0; ... my $x = @list && $y; # if $x is 0, did it come from @list or $y?
sub sub1 { # ... my $x = <some condition> ? $y : undef; # ... }