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

[MacPerl] Loading into memory

To: mac-perl@iis.ee.ethz.ch
Subject: [MacPerl] Loading into memory
From: dj_feldmeyer@jft.com
Date: Thu, 9 Apr 1998 12:12:55 +1000
Content-Description: cc:Mail note part

Is there a way to reserve a portion of memory and then load a variable into
that? I have a ~10MB file I would like to load into a hash and manipulate
directly, and there are portions at the middle and end of the file which relate
to portions nearer the beginning. As it is, I have to read it in and print it
out a line at a time, and there is no easy way to backtrack.

TIA, dj

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

Prev by Date: Re: [MacPerl] Timeout script
Next by Date: Re: [MacPerl] MacPerl and Alpha...
Prev by thread: Re: [MacPerl] MacPerl::GetFileInfo ?
Next by thread: [MacPerl] 3 minute timeout...Recently I have been working on a web based email program using MacPerl...Here's a couple of routines that do what you have asked...Assume that whenever the user logins or checks another page, the routine &logtime is called, updating their 3 minutes...then use the following code to check their time before allowing theroutine &do_your_thing to be called################## check time$sam_time=time();open (LOG, "$log_file"); @time=<LOG>; foreach $line (@time){ if ($line ne ""){ $last_good_time=$line;}close(LOG);}###if ($sam_time <= $last_good_time+180){&do_your_thing; ######it's all good!!!} else {&noentry("2");} ########logtime expired!!!!########sub logtime{$dirname=":mail:$_[0]";$log_file="$dirname:"."log";$sam_time=time();open(LOGTIME, ">$log_file");print LOGTIME "$sam_time\n";close(LOGTIME);}#####PEACE OUT!!!!Samuel Daffner
Navigation: Date Index | Thread Index | Search | Other lists at bumppo.net