Eu sou muito novo em Perl e este é o meu primeiro post aqui, então seja gentil.

Estou usando o tempo real em uma contagem regressiva de 60 segundos e preciso ser capaz de pará-lo a cada 10 segundos e o usuário deve então informar se gostaria de continuar a contagem regressiva ou não a cada intervalo de 10. O temporizador funciona, eu simplesmente não consigo descobrir como pausar para o usuário inserir sua resposta. Como básico de uma resposta como possível seria muito bem-vindo como eu não entendo muito ainda. Obrigado e aqui está o meu código até agora.

my $countdown = 1*60; #60 seconds
$| = 1; #disable output buffering

my $start_time = time;
my $end_time = $start_time + $countdown;


for (;;) {
    my $time = time;
    last if ($time >= $end_time);
    printf("\r%02d:%02d:%02d",
        ($end_time - $time) / (1*60),
        ($end_time - $time) / 60%60,
        ($end_time - $time) % 60,
    );

    sleep(1);
}