branch | RCL_3 |
changeset 73 | 22bdd8a90cc4 |
parent 18 | 99082257a271 |
62:7416fe50a180 | 73:22bdd8a90cc4 |
---|---|
23 |
23 |
24 @EXPORT=qw( |
24 @EXPORT=qw( |
25 Def_ReadFileL Def_WriteFileL |
25 Def_ReadFileL Def_WriteFileL |
26 ); |
26 ); |
27 |
27 |
28 use strict; |
|
29 use File::Path; |
28 use File::Path; |
30 use File::Basename; |
29 use File::Basename; |
31 |
30 |
32 sub Def_ReadFileL ($$$$) { |
31 sub Def_ReadFileL ($$$$) { |
33 # this function reads a .DEF file, putting the export information into a data |
32 # this function reads a .DEF file, putting the export information into a data |