You could also use Flite to count with a voice, and get rid of that annoying beep. :-) Also remember, some terminals have the beep turned off with a software switch.

my $count = 0;
while(1){

  sleep 1;
  system (  "flite -t  $count"  );  # may need cleaner options
$count++;
}
[download]