my $x= ...;
return undef unless defined $x;
return morefoo($x);