Re: [MacPerl] Out of memory! error...doing standard file I/O

[Nicholas.G.Thornton@directory.reed.edu (Nicholas G. Thornton)]

Brock,
I don't have any text file suitably large enough to test the script on, but I'd
use the following code if you're doing what I think you're doing

while (<INFILE>) {														 # I belive this is what you want
																												# for reading through the file
  if ($_ =~ /www\.kev\.mb\.ca/) { # why use index() if you're
     print OUTFILE $_;                        # just testing to see if it's
there?
  }
}


le meas
--nick

# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org