Em relação ao Perl, considere o código abaixo:

open(CORES,">cores.txt");

@cores = ("azul","verde","amarelo","vermelho");

foreach $i (@cores)

{

    print CORES $cores[$i],"\n";

}

close(CORES);

I. Na 1ª linha, a substituição da instrução ">cores.txt" por ">>cores.txt" permitirá a abertura do arquivo para gravação. Se o arquivo já existir, ele será regravado e os dados do arquivo anterior serão perdidos.

II. Na 2ª linha, a variável @cores é uma variável do tipo array, no qual os elementos são acessados por um índice cujo valor para o primeiro elemento é zero.

III. O bloco foreach inicia-se em {, exibido na 4a linha.

IV. "\n", exibido na 5a linha, informa ao sistema para iniciar uma nova linha após a impressão da mensagem.

É correto o que se afirma em