andrew@resam.dk (Leif Andrew Rump) (01/30/91)
Somebody posted a program that could convert the Jargon file
(posted in the computer folklore group) into a fortune file.
Where do I get hold of it?
Leif Andrew
Leif Andrew Rump, AmbraSoft A/S, Stroedamvej 50, DK-2100 Copenhagen OE, Denmark
UUCP: andrew@ambra.dk, phone: +45 39 27 11 77 /
Currently at Scandinavian Airline Systems =======/
UUCP: andrew@resam.dk, phone: +45 32 32 51 54 \
SAS, RESAM Project Office, CPHML-V, P.O.BOX 150, DK-2770 Kastrup, Denmark
> > Read oe as: o <backspace> / (slash) and OE as O <backspace> / (slash) < <tchrist@convex.COM (Tom Christiansen) (01/30/91)
It was I who did the jargon to fortune thing. I'll mail the guy. --tom -- "Hey, did you hear Stallman has replaced /vmunix with /vmunix.el? Now he can finally have the whole O/S built-in to his editor like he always wanted!" --me (Tom Christiansen <tchrist@convex.com>)
tchrist@convex.COM (Tom Christiansen) (01/31/91)
I find that Eric changed the jargon file format a tad, enough
to break mkdict. Here's the new one:
#!/usr/local/bin/perl
($start = '{= [^A-Za-z] (see <regexp>) =}') =~ s/\W/\\$&/g;
while (<>) {
next if 1../^\s*$start/o;
last if /^Appendix A/;
print;
}
All the rest is the same. If you would like the program and don't
have it, mail me (with a good, embedded return address).
Here's the usage message:
usage: jcat [-axlr] entry ...
Search the jargon file for:
-x exact matches only
-a accept also non-anchored matches
-l look mode (or invoke as jlook)
-r random fortune mode (or invoke as jfort)
Yes, it's a perl program, but you probably knew that by now. :-)
--tom
--
"Hey, did you hear Stallman has replaced /vmunix with /vmunix.el? Now
he can finally have the whole O/S built-in to his editor like he
always wanted!" --me (Tom Christiansen <tchrist@convex.com>)