Læse fra tekstfil

jeg har testet ovenstående kode og der er ingen fejl... koden fungerer som ønsket.

det er testet både på en maskine med debian linux og på en solaris-maskine

her er, hvad jeg testede

#!/usr/bin/perl

open(FIL, "<1.txt");
while (defined($line=<FIL>)) {
    print "Line: $line\n";
}
close(FIL);

har du husket at give din fil de rigtige rettigheder (hvis du arbejder på et unix-sytem)... er perl rigtigt installeret?

prøv at skrive

open(FIL, "<1.txt") or die "open error $!";

og se om det ikke giver en fejludskrift

Hej

Du kan også gøre det sådan:
open(IN,"<file");
  @infile=<IN>;
  close (IN);
prine "@infile";

UPS Sæt lige print "@infile"; istedet for prine "@infile";  :-)

Tak for hjælpen.

madsbirk> din metode kan lade sig gøre og kan være ønskværdig, hvis man efterfølgende ønsker at sortere i det data, man har fået fra tekstfilen eller lignende. til gengæld er den ekstremt dyr i hukommelse - især hvis de filer, man skal læse er af betragtelig størrelse. hele filen skal nemlig læses op i ram... dette undgåes ved "while"-måden, da man her kun læser en smule af filen op i hukommelsen ad gangen.