Placer le résultat de la commande système clear dans une variable et imprimer cette variable à chaque fois que vous voulez effacer l'écran :
#!/usr/local/bin/perl use strict; my $clear = `clear`; print $clear;