How can I pause program execution for one second in Perl?

Question

Could anyone show me an example of how to pause for one second in Perl? I am trying the sleep command and it isn't working.

Answer 1

#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;

$| = 1; # Disable output buffering

for (1..10) {
        print '.';
        sleep 1;
}
print "\n";