Oi

Alguém pode sugerir-me a escrever um arquivo contendo valores, ... dizer

19
20
21
22
..
40

para um array @ array \u003d (19, 20, ... 40)

- Obrigado

open(FILE, "<", "file");

while(<FILE>) {
  chomp;
  push(@arr, $_);
}

close(FILE);

obrigado pela resposta .. mas mossegar trabalho ... do u tiver mais alguma sugestão?

Por que não funcionou?

Qual é o resultado esperado?

Você deseja imprimir o array elementos? Se assim for, adicione o seguinte trecho no final

foreach(@arr) {
  print "array element: $_\n";
}

Eu não sei, mas .. este um trabalharam para mim ...

open (FILE, "<", "tmpfile");
my @ valores \u003d <FILE>;
close (FILE);

Eu só queria escrever os valores de um ficheiro em @ array ... mas ainda assim .. ur exemplo, ajudou-me como um ponto de partida ... apreciá-lo .. obrigado novamente ...

você pode ajudar-me sobre isso ... i tentar imprimi-las ($ count, $ last_rec) em duas linhas diferentes, mas eles se impresso em uma linha, se eu usar este script .....

open (FH ,">>"," arquivo ");
imprimir fh "$ count";
imprimir fh "$ last_rec";
close (FH);

você pode sugerir alguma solução para isso ... obrigado

Bem, esta é também uma das formas de fazer isso.

O outro eu tinha postado também deve trabalhar