Discussion :

[florent]

Bonjour,

j'essaye de résoudre un problème et j'aurai besoin de vos points de vues.

J'ai un script CGI dans lequel j'ai définie une constante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

use constant DEBUG => 0;

Ce script appelle un module perso, et je voudrais que quand je passe le DEBUG à 1 dans le cgi principal que le mode DEBUG s'applique aussi dans le module ..

je suis partit dans l'idée d'écrire une fonction set_debug dans le module pour y modifier/définir la constante DEBUG du module.
Mais ça ne fonctionne pas :p je n'ai pas l'impression que la modification de constante soit possible

Module.pm

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
use constant DEBUG => 0;
 
sub set_debug {
       my $debug_value = shift;
       DEBUG => 1 if ($debug_value);
}

Qu'est ce qui me reste comme solution? avez-vous déjà été face à ce besoin?

[Beniou]

Bonjour,

Mais ça ne fonctionne pas :p je n'ai pas l'impression que la modification de constante soit possible

Par définition, une constante ne change pas... Si tu veux vraiment la changer déclare la comme variable.

[florent]

c'est ce que j'ai toujours pensé mais j'ai eu un doute quand j'ai vu dans la doc officielle qu'il changeait les valeurs de reference déclarées comme constant

http://perldoc.perl.org/constant.html

Even though a reference may be declared as a constant, the reference may point to data which may be changed, as this code shows.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    use constant ARRAY => [ 1,2,3,4 ];
    print ARRAY->[1];
    ARRAY->[1] = " be changed";
    print ARRAY->[1];

[Philou67430]

Je crois que Perl Best Practices ne recommande pas l'usage de constant.
Par contre, je ne sais plus ce qu'il recommande pour les constantes...

[Beniou]

c'est ce que j'ai toujours pensé mais j'ai eu un doute quand j'ai vu dans la doc officielle qu'il changeait les valeurs de reference déclarées comme constant

Du coup, je ne vois plus l'intérêt de déclarer des constantes si c'est pour les changer mais bon ...

Par contre, je ne sais plus ce qu'il recommande pour les constantes...

Il me semble qu'il recommande l'utilisation du package Readonly

[Philou67430]

C'est aussi ce que je pensais, mais je ne voulais pas dire de bêtise
En lisant la doc de Readonly, on peut d'ailleurs y voir la longue liste des inconvénients du pragma constant.

[florent]

Du coup, je ne vois plus l'intérêt de déclarer des constantes si c'est pour les changer mais bon ...

Ce n'est pas pour les modifier, c'était juste pour définir une constante via une fonction...