[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [MacPerl] Read Speed



On my PowerBook 540 w/12mb ram, I get an 'Out of memory!' error on the
following, while reading in a 5mb ASCII file:

open(IN,  "$hostname:Desktop Folder:allfiles.txt");
open(OUT, ">$hostname:Desktop Folder:allfiles2.txt");

@LINES = <IN>;
print OUT join(' ', @LINES);

close IN;
close OUT;

Using the afore mentioned read methods, MacPerl duplicated the file in 20
seconds.

--jsj
--Jon S. Jaques
--The Grove Hill Pages
--http://www.grovehillsys.com
--jjaques@grovehillsys.com
--jjaques@illuminata.com
--jjaques@almus.com

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch