Recherche:

voici un programme fait rapidement :
#!/usr/bin/perl
use strict;
use warnings;

use Tk;
use Tk::LabFrame;
use Tk::Adjuster;
use Tk::ROText;
use Tk::Pane;

Comme ça, je dirais qu'il faudrait utiliser deux widgets Text en lecture seule cote à cote, ce sera plus simple à gérer.
Pour faire plus jolie, Il faudrait deux canvas, donc dessiner, mais là, à...

Ok, j'ai bien le programme qui s'ouvre bien.
Qu'est-ce que tu souhaites ?

As-tu un exemple de programme que l'on peut tester. Ce sera plus simple pour que l'on puisse t'aider.