Re^5: reading lines from a text file

You can answer that for yourself by using

while($line=<FH>)
{
   print("outer: $line");
   while($nextline=<FH>)
   {
      print("inner: $nextline");
   }
   print("finished inner\n");
}
print("finished outer\n");
[download]

Comment on Re^5: reading lines from a text file Download Code

Replies are listed 'Best First'.
Re^6: reading lines from a text file by baxy77bax (Deacon) on Dec 27, 2008 at 11:36 UTC
by calling while() inside the while() you are looping in side the line for every line. but if you have some 'standard' separators in your file you could loop between separators with while loop, by defining the separators with special variable $/ something like : `open (FILE, "<", $ARGV[0]) \|\| die "$!"; $/ ="seperator"; while (<FILE>){ ## process lines between separators but don't forget that you define +d record separator as "separator" !!! } $/ = "\n"; # return the record separator to standard or if it is a st +and alone script this is not necessary because you are finished` [download]	[reply] [d/l]

Replies are listed 'Best First'.

Re^6: reading lines from a text file
by baxy77bax (Deacon) on Dec 27, 2008 at 11:36 UTC

but if you have some 'standard' separators in your file you could loop between separators with while loop, by defining the separators with special variable $/ something like :


open (FILE, "<", $ARGV[0]) || die "$!";

$/ ="seperator";
while (<FILE>){

  ## process lines between separators but don't forget that you define
+d record separator as "separator" !!!
}
$/ = "\n";  # return the record separator to standard or if it is a st
+and alone script this is not necessary because you are finished
[download]

[reply]
[d/l]