Afficher le text du file une page à la fois, attendre 20 secondes, puis avancer automatiquement

Cette question est pour AIX 7

Je travaille sur un moniteur qui affichera plusieurs pages de text. Initialement, l'user final voulait une list de défilement pour laquelle j'ai construit ceci:

IFS=''; cat plfeed | while read line; do echo $line; perl -e 'select(undef,undef,undef,.8)'; done 

L'user final a décidé d'afficher une page (24 lignes) de sortie pour une durée définie (20 secondes par exemple). Je sais que plus me permettra d'afficher une page à la fois, mais cela nécessite une input au keyboard qui n'est pas acceptable pour mon cas d'utilisation.

tldr;

Comment puis-je automatiser la command 'more', ou créer une fonction similaire qui va dormir entre les pages et ensuite avancer automatiquement?

Cet awk assez standard devrait être ok sur AIX

 awk '{if(NR>1 && NR%24==1)system("sleep 20");print}' 

Comme mentionné dans les commentaires, si vous voulez sortir de l'interruption, vous pouvez replace le system() par

 {if(system("sleep 20"))exit} 

mais cela pourrait ne pas fonctionner sur votre operating system.

 #!/usr/bin/env expect set timeout 20 spawn -noecho man autoexpect while 1 { expect { timeout { send " " } -ex "(END)" { exit } } }