undef $x;

##</code><code>##

$x = undef;

##</code><code>##

use SwiggedCLib;

#allocate a struct in C
my $pointer = SwiggedCLib::createIt();

#do something with the struct
my $result = SwiggedCLib::doSomething( $pointer );

#destroy the struct - Perl doesn't know how
SwiggedCLib::destroyIt( $pointer );

##</code><code>##

undef $pointer;