branch | RCL_3 |
changeset 73 | 22bdd8a90cc4 |
parent 18 | 99082257a271 |
62:7416fe50a180 | 73: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}; |