Deespués de presentar el resultado, pintas el texto "Pulsa Enter para terminar". Esperas la llegada del Enter con un '<>' dentro del programa y luego haces un 'system("clear");' o 'system("cls");'
Esta pregunta está en las FAQ de Perl:
http://perldoc.perl.org/perlfaq8.htm...-the-screen%3F