NOTE: It must be defined within [[! ... !] to avoid redefinition! [! # Here we add a comment sub Hello { # not much to do ... return 'Hello world' ; } !] Now we call the subroutine: [+ Hello () +]
$XXXXXX::var = [+ defined ($XXXXXX::var)?$XXXXXX::var:' Ok. 
Setup some variable outside our namespace, which should not be cleaned up
[- $XXXXXX::var = 1 -]
$XXXXXX::var = [+ defined ($XXXXXX::var)?$XXXXXX::var:'
[! sub CLEANUP
	{
	print LOG "This will be called before variable cleanup\n" ;
	undef $XXXXXX::var ;
	}
!]