Recharger un fichier

Recharger un fichier - Perl - Programmation

Marsh Posté le 09-09-2005 à 12:25:26    

Bonjour,
 
Alors voila, j'ai un script où je charge des modules, et où je peux les decharger.
Le problème est que quand je les decharges et recharge, il ne prend pas en compte les changements dans le fichier.
 
Voila le code pour decharger les modules :

Code :
  1. sub unloadmodules {
  2. my $module ;
  3. foreach $module (@moduleslist) {
  4.  eval "no $module" ;
  5.  print STDERR "ERREUR: Impossible de decharger $module\: $!\n" if( length( $! ) > 3 ) ;
  6.  print STDERR "ERREUR: Impossible de decharger $module\: $@\n" if( length( $@ ) > 3 ) ;
  7. }
  8. }


 
Et voila le code pour les charger :

Code :
  1. sub loadmodules {
  2. my $module ;
  3. foreach $module (@moduleslist) {
  4.  require ($module.".pm" ) ;
  5.  import $module ;
  6.  print "$module chargé\n" ;
  7. }
  8. }


 
En fait j'ai l'impression qu'il fait le require qu'une seule fois ... Et que la deuxième fois, le import reprend le fichier qu'il aurait mis en cache où je ne sais trop quoi...
 
Comment pourrais-je faire pour être sûr qu'il relise le fichier à chaque fois ??
 
Merci d'avance

Reply

Marsh Posté le 09-09-2005 à 12:25:26   

Reply

Marsh Posté le 09-09-2005 à 12:32:53    

Bon en fait j'ai trouvé :)
 
Module::Reload sur CPAN

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed