Thread Umgang mit projektweiten Konstanten (4 answers)
Opened by gkaiser at 2008-01-29 15:30

gkaiser
 2008-01-29 15:30
#105322 #105322
User since
2007-06-21
4 Artikel
BenutzerIn
[default_avatar]
Hallo,

ich realisiere z.Zt. ein größeres Projekt in Perl und würde gerne mal eure Meinung zum Umgang mit projektglobalen Konstanten wissen.

Zur Zeit habe ich es folgendermaßen realisiert:

In einem Modul GlobalConstants.pm definiere ich die projektweiten Konstanten - hier ein Auszug

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
package GlobalConstants;
use strict;
use warnings;

use vars qw(@ISA @EXPORT_OK);
use Exporter;
@ISA = ('Exporter');

@EXPORT_OK = qw(
&$XML_FILE_EXTENSION
&$ZIP_FILE_EXTENSION
&$JAR_FILE_EXTENSION
);

*XML_FILE_EXTENSION = \".xml";
*ZIP_FILE_EXTENSION = \".zip";
*JAR_FILENAME_EXT = \".jar";

1;


In den anderen Moduln spreche ich sie dann wie folgt an (Bsp):
Code: (dl )
1
2
3
use GlobalConstants;

_fileCopy($fileName,$srcDir,$dstDir) if ($fileExt eq $GlobalConstants::XML_FILE_EXTENSION);


Ist das ein sinnvolles Vorgehen? Gibts ein anderes, besseres, perl likeres Vorgehen?

Danke im Voraus
Gaston

View full thread Umgang mit projektweiten Konstanten