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

[Ronald J Kimball <rjk@linguist.dartmouth.edu>]

On Wed, May 03, 2000 at 02:57:36PM -0600, Keary Suska wrote:

> The code provided is only loading the first record, then exiting. It could
> not be checking every record.

I think you were misled by the structure of the code:

> > $item = <INFILE>;
> > 
> > while ($item)
> > {
> > $item = <INFILE>;
> > }


That does read in the entire file line by line, although it's not the usual
Perl idiom:

while (defined($item = <INFILE>)) {
}

which would work just as well here.

Ronald

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