Como criar um laço for infinito em Perl

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

# Como criar um loop for infinito em Perl

$contador = 0;
for(;;){
  print $contador . "\n";
  $contador++;
 
  # temos que parar este laço de alguma forma
  if($contador > 10){
    last;
  }
}