Ajout de boutons, zone de saisie...
$main = MainWindow->new(-title=>'Convertisseur Euro :');
$fin = $main->Button(-text=>'Fermer', -command=>sub {exit})
Perl/tk exploite une structure hiérarchique et tout objet doit posséder un parent
Pour réaliser cela, on créé une référence à la fenêtre principale à travers une variable ($main)
Pour créer un bouton dans cette fenêtre (fils de l ’objet fenêtre), on utilise la méthode button sur la référence $main
De plus, la ligne de création du bouton affiche aussi le texte « Fermer » qui est associé à une action (une procédure dont la finalité est de quitter le programme)
La méthode pack mentionne à Perl de placer le widget Button dans le widget principal