[Tk] Curseur Widget Text

Bonjour,

je voudrais savoir comment récupérer la position du curseur dans un widget text afin d' insérer du texte a l'endroit où est placer le curseur

Merci

Code:

---

my ($x, $y) = $Widget->pointerxy();

---

avec un peu de retard

merci mais j'avais trouvé j'avais oublier de mettre résolu