open file, iterate through it

[Anon]

how would you open a file then go through it line by line? in perl, it would be:

open(FILE,"<file_location");
while(<FILE>) {
do what you need to do;
}
close(FILE);

thanks,
john

[Anon]

$fp = fopen("filename.txt", "r"); //r = readonly

while (!feof($fp)) {
$line = fgets($fp, 4096); //get 4096 characters or an end of line which ever comes first
}

fclose($fp);