my $t; # perl int* pi; // C/C++ #### my $t = undef; # perl int* pi = NULL; // C/C++