[MacPerl] Re: opening and reading text files

["Bill Jones" <bill@fccj.org>]

> At 11:12 PM -0700 8/7/99, gene.ray@excite.com wrote:
> 
>>I can successfully open a text file and display the contents on the web
>>using a perl script, however when the text file becomes too large my script
>>hangs. The log file is less than 8k when it does this.   How can I allow a
>>larger text file to be displayed?  Does anyone have a suggestion?
>
> People routinely use [Mac]Perl to handle files up to multi-megabyte
> size, for WWW use and lots of other applications, so...
>
> SUTC -- Show us the code!
>

MacPerl, et al, needs more memory:

The following will turn a perfectly good binary file (6.7 MacBytes)
into a 6.6 MacByte text file...

open IRECORD, "<Decipher_sights_sounds" or die "Ouch!  Stop $! $?";
open ORECORD, ">TESTING.WCJ" or die "Yowie, stop $! $?";

while (<IRECORD>) { # Inhale file...

  s{(mis\b)} {<A HREF="/cgi/http_webster?isindex=$1">$1</A>}ig;

  print ORECORD; # Barf data...
}

HTH,
-Sneex-  :]
FCCJ Data Security Group
____________________________________________________________________
Bill Jones    Data Security Specialist    http://jacksonville.pm.org

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