nächstes »

[dmaphy]

also, ich hab vor ein gäsetebuch zu schreiben. klein aber fein.
dazu müsste ich die zeilen einer textdatei einzeln auslesen...

meine idee war die:

Code:

for ($i=0,$i < eof,$i++){
$data=<output>;
print "<br />$data\n";
print "<div align='center'><table border='1'>";
@daten=split(/&/,$data);
$j=0;
while ($j<4){
print "<tr><th>";
if ($j==0){print "Name:";}
elsif($j==1){print "Homepage:";}
elsif($j==2){print "email:";}
elsif($j==3){print "Beitrag:";}
print "</th><td>",$daten[$j],"</td></tr>\n";$j++;
}
print "</td></tr></table></div>"; }

nun zu der kritischen stelle mit der for-schleife: was müsste dort korrekterhalber stehen?

[grandslam]

eof gibt nich die grösse des file zurück oder die anzahl zeilen, sondern sobald du am ende der datei bist gibt sie true zurück.
es gibt verschiedenen möglickeiten files zu lesen. wenn du so wieso das ganze file brauchst:

Code:

open(MYINPUTFILE, "<filename.out"); # open for input
my(@lines) = <MYINPUTFILE>;         # read file into list
@lines = sort(@lines);              # sort the list
my($line);
foreach $line (@lines)              # loop thru list
   {
   print "$line";                   # print in sort order
   }
close(MYINPUTFILE);

oder line by line:

Code:

open(MYINPUTFILE, "<filename.out");
while(<MYINPUTFILE>)
   {
   # Good practice to store $_ value because
   #  subsequent operations may change it.
   my($line) = $_;

   # Good practice to always strip the trailing
   #  newline from the line.
   chomp($line);

   # Convert the line to upper case.
   $line =~ tr/[a-z]/[A-Z]/;

   # Print the line to the screen and add a newline
   print "$line\n";
   }

[dmaphy]

ich hab neulich mal aus langeweile in selfhtml nachgeschlagen und dort folgendes gefunden:

Code:

while(! eof(handle)){}

.....


das problem war, dass ich erstens nicht wusste, dass sowas in selfhtml steht und zweitens nicht wusste, dass es das ausrufezeichen als einzelnen operator gibt....
mein code sieht jetzt so aus, dass ich einfach die for-schleife gnaz am anfang dadurch ersetzt habe.....

danke grandslam