AUTOR PREGUNTA #1
Publicado 14 septiembre 2014 - 16:56
¿De qué manera puedo reducir la duplicidad en las constantes en Perl?
-
¿Tienes la misma pregunta? Yo también
PREGUNTAS SIMILARES
#2
Publicado 14 septiembre 2014 - 17:24
Prueba el siguiente código en tu aplicación el cual se encarga de eliminar la duplicidad por completo:
use Readonly;
Readonly my $LOG_DIR => "/var/log";
Readonly my $LOG_FILENAME => "$LOG_DIR/file1.log";
Readonly my $ETC => '/etc/app1';
Readonly my $LOG4PERL_CONF_FILE => "$ETC/log4perl.con";
Readonly my %CONF_FILES => map { $_ => "$ETC/config$_.xml" } 1 .. 5;
