Select Code to Download

#include <EXTERN.h> 
#include <perl.h> 
...
PERL_SYS_TERM(); 
}

    

package cryzone; 
...
 
1;

use cryzone; 
...
$cryzone::a=2; 
print $cryzone::a;

package cryzone; 
$a=0; 
1;