sbsv1_os/e32toolp/e32util/_secure_E32Env.pm
branchRCL_3
changeset 16 22bdd8a90cc4
parent 2 99082257a271
equal deleted inserted replaced
13:7416fe50a180 16:22bdd8a90cc4
    16 # within the Epoc32 Environment
    16 # within the Epoc32 Environment
    17 # 
    17 # 
    18 #
    18 #
    19 
    19 
    20 package E32env;
    20 package E32env;
    21 
       
    22 use strict;
       
    23 
    21 
    24 use vars qw(%Data);
    22 use vars qw(%Data);
    25 
    23 
    26 BEGIN {
    24 BEGIN {
    27 	my $epocroot = $ENV{EPOCROOT};
    25 	my $epocroot = $ENV{EPOCROOT};