Faire une division de variables en TCL/Tk

トップ ページ

このメッセージに返信
著者: Jean-Philippe Barbier
日付:  
To: guilde
題目: Faire une division de variables en TCL/Tk
(re)Bonjour à tout le monde,
je suis en train de faire un script en TCL/TK qui fait la chose suivante:

il se connecte a une machine distante, calcul (via un "du -b") la
taille d'un repertoire
puis il calcul le temps de transfert, sachant que le debit est
constant a 80Ko/s, et l'affiche a l'utilisateur.

Sauf que voila, je n'arrive pas à diviser 2 variables ...

j'ai fait ça :

set cmd "rsh $MACHINE -l sitr 'du -b $REP_DATAO/$NUMERO_DATA | tail
-n 1 | cut -f1' 2>/dev/null"
set TAILLE [ exec /bin/sh -c $cmd ]

#calcul du temps de transfert
#debit moyen de 80Ko/s
set TEMPS_TRANSFERT [$TAILLE div 81920] #c'est ca qui marche pas ...

set ETAT_TRANSFERT "Temps de telechargement : $TEMPS_TRANSFERT"
etatTransfert configure -text "Temps de telechargement :
$TEMPS_TRANSFERT" -background #00ff00


Si quelqu'un connait la facon de diviser 2 variables ... Merci d'avance !

Librement,
Jp