[Perl/Tk] Tk::ProgressBar Fuite memoire

Bonjour,

Dans l'exemple suivant:
$mabar = $cadre_bas->ProgressBar( -padx=>2,
					   -pady=>2,
					   -troughcolor=>'#BFEFFF',
					   -colors=>[ 0, '#104E8B' ],
					   -length=>40,
					   -from =>'0',
					   -to => '30',
					   -variable => \$variable1,
					   -borderwidth=>2 );

A chaque fois que $variable1 change de valeur, il y a une fuite memoire importante.

Je n'ai pas trouve dans le forum de point sur ce probleme.
Avez vous deja rencontré ce probleme et si oui comment y remedier ?

Windows XP/perl, v5.8.8 built for MSWin32-x86-multi-thread

merci
Configuration: Windows XP
Opera 9.10

2 réponses

  1. Modérateur
    Salut,

    il y a une fuite memoire importante.

    Veux-tu détailler?
    Merci.
    0
    1. Ma variable1 est un compte à rebours, elle change chaque seconde:
      en 30 secondes mon process est passe de 79 264 Ko a 96 296 Ko avec 2 progressBar

      Soit environ un perte memoire de 280 Ko/sec, si dans le code j'inhibe la ligne
      -variable => \$variable1,

      il n'y a plus de fuite memoire.
      merci
      0