>>>>> "JP" == John Poltorak <jp@eyup.org> writes:
JP> If I can get hold of this version I'd like to try it out.
An old web page is at http://www.hpc.uh.edu/majordomo/; the instructions
there on grabbing the source from CVS are up-to-date.
JP> seek(IN, - length($_), 1);
That's understandably busted. Fortunately we don't do that in Mj2.
JP> I'm not sufficiently familiar with Perl to know if there are any
JP> options for getting round this.
To support the old approval methods in Mj2, we do a tell at the beginning
of each line and then seek back to it instead of relying on the length of
$_ to be equal to the number of bytes we have to rewind.
JP> Unlink does delete files *sometimes*, but AFAIAA, files in use can be
JP> 'unlinked', whereas on OS/2 (and probably DOS & NT) you can't 'delete'
JP> files which are in use.
That's a sad limitation; it is a very common procedure under Unix systems
to open a file and then delete it. I am not sure if we do it anywhere in
the code or not, or if any of the modules we use does it.
JP> Is it possible to include platform dependent code such as
I would really, really rather not make things messier than they need to be;
it's bad enough as it is with no platform-dependent code. However, much of
this is encapsulated in modules, so you could write your own that provide
the necessary semantics. (Assuming that your platform is capable of
providing those semantics, which isn't a given.)
The important ones are Mj::Lock (uses flock), Mj::File (provides
transparently locked files) and Mj::FileRepl (provides a simple method of
file replacement, where reads from the handle come from the old file and
writes go do the new one). You might not have anything like BerkeleyDB,
either, in which case you'd have to write your own database backend or use
the dog-slow Mj::SimpleDB::Text.
But if you're not really up with Perl then this is most likely going to be
way beyond you. I tried to do what I could to help make it doable, but I
can't do much more since I don't have access to any of those other
platforms.
- J<
References:
|
|