[7293] in Perl-Users-Digest
Perl-Users Digest, Issue: 918 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 25 11:17:22 1997
Date: Mon, 25 Aug 97 08:00:27 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 25 Aug 1997 Volume: 8 Number: 918
Today's topics:
------ C o m p r e h e n s i v e I n t e r n e t P r (Electric Fence)
A 100% Perl Search engine <ccadic@planetepc.fr>
Chart-0.93 available on CPAN (David Bonner)
date & time calculations <chandrak@ml.com>
Re: Help on Final Exam (Perl class) <seay@absyss.fr>
Help: Give Perl to an uneducated slob & this is what ya <martz@standard.net.au>
Re: Help: Give Perl to an uneducated slob & this is wha <tom@mitra.phys.uit.no>
Re: How do I drop trailing spaces? <seay@absyss.fr>
How to differentiate a string and an integer <marius@funcom.com>
Re: is there a perl compiler ported to NT? (Dennis Taylor)
Re: last line of a @list... (Tad McClellan)
Re: Passing the output to a variable (Tad McClellan)
Re: Perl Performance FAQ? (Andrew M. Langmead)
Re: Q: get class at runtime and instantiate? <seay@absyss.fr>
Re: Q: get class at runtime and instantiate? (Andreas Schmidt)
Regex Matchin Problem andrew@ugh.net.au
Re: Regex Matchin Problem <tom@mitra.phys.uit.no>
Re: Regex Matchin Problem (Clay Irving)
Re: Replace-Problem (Tad McClellan)
servername?? <dannyl@computize.com>
Re: servername?? <seay@absyss.fr>
sort - help needed denis@mathi.uni-heidelberg.de
Re: Trivial(?) readdir question <seay@absyss.fr>
Re: Win95 from a very definite newbie... help please (Jim Michael)
WWW::Search 1.010 released johnh@ISI.EDU
xisofs v1.1 Perl/Tk interface to mkisofs/cdwrite (The Pariah)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 25 Aug 1997 12:06:33 GMT
From: blue@moon.com (Electric Fence)
Subject: ------ C o m p r e h e n s i v e I n t e r n e t P r o g r a m m e r 's R e s o u r c e -------
Message-Id: <3408753a.113907851@news.mindspring.com>
Digital Tool is an 2.5 year old web site that is slowly but steadily
evolving into a comprehensive internet programmer's resource...
We are in the process of updating and adding a chat facility, and we
are bolstering our VB and related links...
Best of all, you don't have to deal w/ too many ads. spinning
graphics, or outdated links (currently ~2.3%) out of >800 links...
All browsers are welcome, but of course, the more fun experience comes
w/ Nav 3+ and MSIE 3+...
Best, Tom Porter, Ph.D.
http://www.dtool.com
THE DIGITAL TOOL
Electric Fence
SPAM Bait: root@mailloop.com,jorge@mailloop.com,jorgeh@earthlink.net
mabel@SALLYNET.COM , iq2000@usa.net , remove@hotmail.com
------------------------------
Date: Mon, 25 Aug 1997 05:31:38 -0700
From: "RCI Federation" <ccadic@planetepc.fr>
Subject: A 100% Perl Search engine
Message-Id: <01bcb151$8861a820$0101a8c0@sexytop>
I decided to offer a Perl Search engine to the Perl programers community.
You can use it and freely place all the Perl web sites you want to promote.
http://www.cadic.com
Hope you will like it. It's the beginning but should grow fast.
Yours
------------------------------
Date: 25 Aug 1997 12:43:29 GMT
From: davidb@kenan.com (David Bonner)
Subject: Chart-0.93 available on CPAN
Message-Id: <5trulh$p7g$1@nadine.teleport.com>
Chart-0.93 was posted to CPAN on Friday. It fixes the compilation
problems that people running anything before 5.004 were having. It
also patches a few other bugs present in 0.92, and adds a new chart
type, Chart::StackedBars. As usual, please mail me with any bugs
you find, so I can get them fixed. Thanks.
--
#=====================================================================#
#"it's the word's suppression that gives it the | david bonner #
# power, the violence, the viciousness" -lenny bruce | dbonner@bu.edu #
#=====================================================================#
------------------------------
Date: Mon, 25 Aug 1997 09:31:21 -0400
From: Chandra Kandiakounder <chandrak@ml.com>
Subject: date & time calculations
Message-Id: <34018929.3D37@ml.com>
Hi,
Is there any perl library which is useful for date and time
calculation. For example, like given a date the perl routines should
be able to give date, which is 'x' number of days from the given date..
I welcome any suggestions.
-Chandrakanth
--
==============================================================================
The woods are lovely dark and deep
But I have promises to keep
Miles to go before I sleep
Miles to go before I sleep.
------------------------------
Date: Mon, 25 Aug 1997 13:22:27 +0200
From: Doug Seay <seay@absyss.fr>
Subject: Re: Help on Final Exam (Perl class)
Message-Id: <34016AF3.72B6BE26@absyss.fr>
Ed Young wrote:
>
> Hmmm. It would have to be a in a problem domain that is widely
> understood, so folks could concentrate on perl, not on the problem
> itself. How about a personal time logger/reporter. Might even be of
> use after the class. You could use Tk for the interface. A tied hash
> for logged activity selection that could be dynamically updated. Write
> a weekly report. Could go after system calls like time. Might even
> extend it to include a to-do list, a calendar. Many possibilities here.
IIRC from when I was a TA, the rule is the instructor/TA should be able
to do it in 25-30% of the time needed by the students (at least at the
lower undergradute level, it might be different with seniors and grad
students). Since most of us who post would be at the TA level, we
should be targeting 10 hours of work for us. I don't think I could
write that and get it debugged in 10 hours.
> Mike Elliott wrote:
> >
> > I'm going to be teaching a ten-week Programming in Perl class next
> > year, and I'd like to make the Final Exam a Perl project. As this is
> > University Extension, I can't expect more than perhaps 30 to 40 total
> > hours (per student) expended on it spread out over the quarter.
Use Ed's idea if you like, but drop the Tk interface. Just a couple of
routines to manage time, store the data in a tie'd DBF file, print the
info in neat columns. Hit them with the error checking. That is a more
critical skill to learn and it is a good way to ensure that they know
how to parse input in perl.
Do your students a favor, hit them with a penalty for each warning they
get with "-w" and "use strict". Do this from the begining to teach them
good habits.
Also, could you give us the course outline? I'd like to see what you
taught and in which order. Do you assume that they already know at
least one computer language, or will you have complete beginners in your
class? If they don't know C or a unix shell, you will not get all that
far. Pascal-to-Perl sounds painful.
- doug
------------------------------
Date: Mon, 25 Aug 1997 22:46:39 +1000
From: Michael Artz <martz@standard.net.au>
Subject: Help: Give Perl to an uneducated slob & this is what ya get
Message-Id: <34017EAF.6966@standard.net.au>
Ok
Here's my problem:
I have written the code to do almost everything, after buying a text.
However I need to do the following.
The program reads a text file, comma delimited & prints each line to
seperate files
The fields are presented thus:
"AAA","Aristocrat","wda",2.30.etc
I can split the file on the commas, but I need to get rid of the " from
those fields that have it.
Also To save the files I have the following code... is there an easier
way?
$extension = ".csv";
$code = $code.$security;
$thisRecord="$date,$code,$issuer,$open,$close,$low,$high,$vol\n";
$thisFile=$code.$extension;
#print the data to a file and begin a new one
open (OUTFILE, ">$thisFile") || die("Can't open output file");
print OUTFILE ($thisRecord);
close OUTFILE;
Thanks in advance...
I know this is very basic.... but then so am I
Mick Artz
------------------------------
Date: 25 Aug 1997 16:09:43 +0200
From: Tom Grydeland <tom@mitra.phys.uit.no>
Subject: Re: Help: Give Perl to an uneducated slob & this is what ya get
Message-Id: <nqog1ryxsk8.fsf@mitra.phys.uit.no>
Michael Artz <martz@standard.net.au> writes:
> The fields are presented thus:
> "AAA","Aristocrat","wda",2.30.etc
That's a comma separated value (CSV) format.
Parsing CSV is a FAQ (Frequently Asked Question)
> I can split the file on the commas, but I need to get rid of the " from
> those fields that have it.
If you split on comma, you could split fields that look like "hi, mom!".
man perlfaq
man perlfaq4
> Also To save the files I have the following code... is there an easier
> way?
Not really. Perl isn't great enough to do things without you telling
it what to do.
> open (OUTFILE, ">$thisFile") || die("Can't open output file: $!");
Let Perl tell you why: ^^
> print OUTFILE ($thisRecord);
> close OUTFILE;
What's so wrong about what you have?
> Mick Artz
--
//Tom Grydeland <Tom.Grydeland@phys.uit.no>
------------------------------
Date: Mon, 25 Aug 1997 16:10:41 +0200
From: Doug Seay <seay@absyss.fr>
Subject: Re: How do I drop trailing spaces?
Message-Id: <34019261.30809632@absyss.fr>
robert wrote:
>
> bernard510@hotmail.com:
> >How can I replace the contents of $name with the text string without the
> >trailing spaces?
>
> How about:
> $name =~ s/\s*$//;
Change that * to a + to be more effecient.
- doug
------------------------------
Date: 25 Aug 1997 13:19:21 +0200
From: Marius Kjeldahl <marius@funcom.com>
Subject: How to differentiate a string and an integer
Message-Id: <52bu2mo6h2.fsf@ace.funcom.com>
Does anybody know how this can be done in perl _without_ the script
emitting -w noises? I have tried the method described in man perldata,
but it _does_ emit warnings (as said in man perldata). I need to make
sure that two scalars integers, so I can use the '==' test further
down in my script.
Anybody?
Thanks in advance,
Marius
------------------------------
Date: Sat, 23 Aug 1997 13:58:38 -0500
From: corbeau@execpc.com (Dennis Taylor)
Subject: Re: is there a perl compiler ported to NT?
Message-Id: <corbeau-2308971358380001@news.smu.edu>
In article
<Pine.OSF.3.96.970822115644.31017A-100000@saul9.u.washington.edu>, Y Chen
<yinso@u.washington.edu> wrote:
>Hello,
>
>got a question for all you perl gurus out there... do you know whether or
>not Mr. Malcolm Beattie's compiler has been ported to NT? I have run the
>compiler under unix, however, I can't find one for NT yet. If someone can
>let me know where to find information about it, I will be grateful :)
Don't hold your breath. Malcolm's compiler isn't even out of alpha
yet on Unix, so hoping that it's been ported to NT is probably premature.
As much as I hate to say it, you'll probably have to wait until 5.005 is
ported to NT (I believe a built-in compiler is planned) to get your wish.
Sorry...
dennis t
_________________________________________________________________________
"A grief without a pang, void, dark, and drear, |
A drowsy, stifled, unimpassioned grief, | Dennis Taylor
Which finds no natural outlet or relief |
In word, or sigh, or tear." --S. Coleridge | dptaylor@post.smu.edu
_________________________________________________________________________
Internet Depression Resources List: http://www.execpc.com/~corbeau/
------------------------------
Date: Mon, 25 Aug 1997 07:03:28 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: last line of a @list...
Message-Id: <gasrt5.bt2.ln@localhost>
Bert ten Cate (bert@arsnova.xs4all.nl) wrote:
: I'm new to perl and have a question that might sound stupid, but I'm stuck so
: here it goes...
: I need to get the last line of @list into $lastline. Does anybody know how to
: do this? Any help is appriciated...
To get the last _element_ (which may or may not be a 'line') of an array:
$lastline = $list[-1];
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 25 Aug 1997 07:08:09 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Passing the output to a variable
Message-Id: <9jsrt5.bt2.ln@localhost>
Wei Tang (wtang@cs.ualberta.ca) wrote:
: Hi, there:
: I want to pass the output of a shell program to a perl variable in a CGI
: script. I tried $buf = `shell_prog`; though it did work in Unix shell
: command line, it didn't work through a CGI script.
: Is there a way out?
Yes, but it probably isn't a perl problem :-)
Is shell_prog a csh builtin (backticks run in sh)?
Is shell_prog in the path for whatever user the HTTP server runs as?
You have a server setup question here. Try one of these:
comp.infosystems.www.authoring.cgi
comp.infosystems.www.servers.misc
comp.infosystems.www.servers.unix
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 25 Aug 1997 11:56:42 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: Perl Performance FAQ?
Message-Id: <EFGx6J.KBE@world.std.com>
"Andrew McNaughton" <andrew@squiz.co.nz> writes:
>In article <5tcf0u$gc$1@taurus.fccc.edu>, edmonson@chlccs.fccc.edu (Michael
>N. Edmonson) wrote:
>>- When passing large arrays or hashes to subroutines, pass
>> references to the objects intead. There may be a little more
>> expense associated with dereferencing, but at least Perl won't have
>> to make a copy of the whole thing with every subroutine call.
>maybe. Sometimes it's just extra complexity.
To some extent. You're right in that the copying of the list of
scalars isn't done by the subroutine call, it is done by the assigning
to local variables via my() or local(). But, Perl does still has to
push things onto the stack, even if it is only aliases objects that
already exist, which will take some time.
As the size of @foo increases, does the cost of dereferencing in
with_ref() stay constant the cost of argument passing in
without_ref()? In my tests, with_ref() always performs better than
without_ref(), but as @foo increases in size the ratio of the
difference diminishes.
And then if you consider that not using my() or local() forces you to
to leave your arguments unnamed, which may be hard to sell
without_ref() a a blow against complexity.
Here are my results with the upper bound of @foo as 1000, 10_000, and
100_000.
/usr/tmp/aml>perl foo
sum = 500500
without_ref: 4
sum = 500500
with_ref: 3
/usr/tmp/aml>!p
perl foo
sum = 50005000
without_ref: 36
sum = 50005000
with_ref: 32
/usr/tmp/aml>!p
perl foo
sum = 5000050000
without_ref: 389
sum = 5000050000
with_ref: 364
--
Andrew Langmead
------------------------------
Date: Mon, 25 Aug 1997 13:26:17 +0200
From: Doug Seay <seay@absyss.fr>
Subject: Re: Q: get class at runtime and instantiate?
Message-Id: <34016BD9.60870130@absyss.fr>
Jeff Hallgren wrote:
>
> I want to "use" a class whose name is in a string and then
> instantiate an object of that class... I can't get this to work.
> What I have below is apparently way off but it should demonstrate
> the idea...
> Help/documentation pointers apprieciated. I've seen runtime
> method invocations but nothing on classForName() operations.
> Jeff
Would
eval "use $modulename";
work well enough for you?
------------------------------
Date: 25 Aug 1997 14:11:33 GMT
From: schmidt@miserv2iai.kfk.de (Andreas Schmidt)
To: jhall@APAMAWAY.tahiti.umhc.umn.edu
Subject: Re: Q: get class at runtime and instantiate?
Message-Id: <5ts3ql$mij$1@nz12.rz.uni-karlsruhe.de>
In article <33FEF094.B12B0C37@SPAMAWAY.tahiti.umhc.umn.edu>, Jeff Hallgren <jhall@SPAMAWAY.tahiti.umhc.umn.edu> writes:
|> I want to "use" a class whose name is in a string and then
|> instantiate an object of that class... I can't get this to work.
|> What I have below is apparently way off but it should demonstrate
|> the idea...
|> Help/documentation pointers apprieciated. I've seen runtime
|> method invocations but nothing on classForName() operations.
|> Jeff
|>
|>
hola jeff
try using eval() in your 'returnAnObjectFor' method.
hopethishelps
smiff
========================================================================
andreas schmidt email: schmidt@iai.fzk.de
institut fuer angewandte informatik (iai) phone: +49 7247 82 5714
forschungszentrum karlsruhe gmbh
- technik und umwelt -
postfach 3640 76021 karlsruhe (germany)
------------------------------
Date: Mon, 25 Aug 1997 20:38:31 +1000
From: andrew@ugh.net.au
Subject: Regex Matchin Problem
Message-Id: <Pine.BSF.3.96.970825203556.14761A-100000@depravitas.tuu.utas.edu.au>
Hi,
I was wondering why
if ($fred =~ m/^220/) {
never matches when $fred contains something like:
220 corinna.its.utas.edu.au ESMTP Sendmail 8.8.5/8.8.4-utas-ff; etc
new line here ^^^^
Must be something I am missing...
Thanks,
Andrew
------------------------------
Date: 25 Aug 1997 14:05:25 +0200
From: Tom Grydeland <tom@mitra.phys.uit.no>
Subject: Re: Regex Matchin Problem
Message-Id: <nqoiuwuxybe.fsf@mitra.phys.uit.no>
andrew@ugh.net.au writes:
> I was wondering why
> if ($fred =~ m/^220/) {
> never matches when $fred contains something like:
> 220 corinna.its.utas.edu.au ESMTP Sendmail 8.8.5/8.8.4-utas-ff; etc
If $fred is e.g. a multiline string with the given line only part of
the line, you need the /m flag on the match to enable ^ to match after
an embedded newline. Otherwise, ^ matches only at the very beginning
of a string.
if ($fred =~ m/^220/m) ...
man perlre for details.
> Andrew
--
//Tom Grydeland <Tom.Grydeland@phys.uit.no>
------------------------------
Date: 25 Aug 1997 09:44:35 -0400
From: clay@panix.com (Clay Irving)
Subject: Re: Regex Matchin Problem
Message-Id: <5ts283$nfq@panix.com>
In <Pine.BSF.3.96.970825203556.14761A-100000@depravitas.tuu.utas.edu.au> andrew@ugh.net.au writes:
>I was wondering why
> if ($fred =~ m/^220/) {
>never matches when $fred contains something like:
>220 corinna.its.utas.edu.au ESMTP Sendmail 8.8.5/8.8.4-utas-ff; etc
> new line here ^^^^
>Must be something I am missing...
Must be. It works for me:
#!/usr/local/bin/perl5.003 -w
$fred = "220 corinna.its.utas.edu.au ESMTP Sendmail 8.8.5/8.8.4-utas-ff; etc
";
if ($fred =~ m/^220/) {
print "Got it\n";
} else {
print "Didn't get it\n";
}
Prints:
Got it
--
Clay Irving <clay@panix.com> http://www.panix.com/~clay/
------------------------------
Date: Mon, 25 Aug 1997 06:35:15 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Replace-Problem
Message-Id: <jlqrt5.qq2.ln@localhost>
Tom Grydeland (tom@mitra.phys.uit.no) wrote:
: Heinz Diehl <hd@elfie.rhein-neckar.de> writes:
: > I have a big number of strings, and I want to replace all
: > "x" characters with an "_" , but if the first character of a
: > string is an "x", then that "x" at the beginning should not be
: > converted:
: > Is it possible to do this with a single "search and replace" ?
: Does it *have* to be "search and replace"?
In case it does (ought to be good and slow compared to your's though):
s/(^x)|x/$1 ? 'x' : '_'/ge;
: substr($string,1) =~ tr/x/_/;
: (tested and works as requested)
--
Tad McClellan SGML Consulting
tadmc@flash.net Perl programming
Fort Worth, Texas
------------------------------
Date: Mon, 25 Aug 1997 09:09:49 -0500
From: Danny LaPrade <dannyl@computize.com>
Subject: servername??
Message-Id: <3401922D.4546@computize.com>
I want to be able to find out on my webpage
what people is viewing my page.
I want to retrieve the servername of the each user
that hits my site.
How do I retrieve the servername?
--
--------------------------------------------------------------
-- Danny LaPrade
-- Advertising - Web Development
-- 1030 Wirt Road #400
-- Houston, Texas 77055-6849
-- 713.957.0057
-- 713.613.4812 Fax
--
-- http://www.computize.com/
--------------------------------------------------------------
"Hold on to your dreams while pulling
through the present. "
------------------------------
Date: Mon, 25 Aug 1997 16:43:54 +0200
From: Doug Seay <seay@absyss.fr>
Subject: Re: servername??
Message-Id: <34019A2A.26544218@absyss.fr>
Danny LaPrade wrote:
>
> I want to be able to find out on my webpage
> what people is viewing my page.
> I want to retrieve the servername of the each user
> that hits my site.
>
> How do I retrieve the servername?
Do you really think that this is a Perl question? If so, why? How will
the answer be different if you had used C instead of Perl? Go to some
CGI group and ask over there. This is a Perl newsgroup, we talk about
Perl, not CGI. Sure, many CGI programs have interesting Perl problems
in them. But not this one.
- doug
------------------------------
Date: Mon, 25 Aug 1997 15:03:51 +0200
From: denis@mathi.uni-heidelberg.de
Subject: sort - help needed
Message-Id: <340182B7.167E@mathi.uni-heidelberg.de>
hi,
i have an array (@xx) with fields such as these:
$xx[]="text1 text2 number text3";
and i want so sort it by the numbers. so i tries something like
this:
sub numb
{
@tmp=split(/\s+/);
$tmp[2]{$a} <=> $tmp[2]{$b};
}
@xx2=sort numb @xx
but this doesnot work... maybe i search in the wrong variable...
or is $tmp[2]{$a} wrong?
thanks for any help
denis
------------------------------
Date: Mon, 25 Aug 1997 15:54:46 +0200
From: Doug Seay <seay@absyss.fr>
Subject: Re: Trivial(?) readdir question
Message-Id: <34018EA6.1D1124F@absyss.fr>
Tom Grydeland wrote:
>
> kisrael@allegro.cs.tufts.edu (Kirk L. Israel) writes:
>
> > @entries = readdir DIR;
>
> @entries = grep !/^\.\.?$/ readdir DIR;
Although it isn't exactly what he asked for, I'd go with something along
the lines of
@entries = grep !/^\./, readdir DIR;
because that will skip all dotfiles. That is usually more useful than
simply skipping '.' and '..'.
Kirk, why take the risk of simply shifting the first two files when you
can safely use some sort of grep to do the same thing? If you really
want to assume that the first two entries are your dots, this would have
been quicker (no shift)
($dot, $dotdot, @entries) = readdir DIR;
- doug
------------------------------
Date: Mon, 25 Aug 1997 10:41:09 GMT
From: genepool@netcom.com (Jim Michael)
Subject: Re: Win95 from a very definite newbie... help please
Message-Id: <genepoolEFGtoL.D67@netcom.com>
Ed Young (youngej@magpage.com) wrote:
: You will require gzip.exe and tar.exe to install the distribution.
: This is an excellent rendition of perl. Well worth the trouble.
Just an FYI, the current version of WinZip32 will handle these
compression formats.
Cheers,
Jim
------------------------------
Date: 25 Aug 1997 12:46:05 GMT
From: johnh@ISI.EDU
Subject: WWW::Search 1.010 released
Message-Id: <5truqd$pe3$1@nadine.teleport.com>
WWW::Search 1.010 is released.
See the announcement below for change details.
AltaVista work again, other engines are in the process of being
upgraded.
-John Heidemann
======================================================================
WWW::Search and AutoSearch
==========================
WHAT IS NEW WITH WWW::Search 1.010?
-----------------------------------
- new: normalized_score, a back-end independent score (from Paul Lindner)
- new: generic options are supported by several back-ends
(specify search engine URL, debugging, etc.)
- new: AltaVista back-end now sets SearchResult::raw
- bug-fix: update for AltaVista (page format changed Jul 97)
(some information wrt fix provided by Guy Decoux)
This release is an interim release, I hope to have a more complete
release in late August fixing the other (currently broken search engines).
WHAT IS WWW::Search?
--------------------
WWW::Search is a collection of Perl modules which provide an API to
WWW search engines. Currently WWW::Search includes back-ends for
variations of AltaVista, Dejanews, Excite, HotBot, Infoseek, and
Lycos. We include two applications built from this library:
AutoSearch (an program to automate tracking of search results over
time), and WebSearch, a small demonstration program to drive the library.
Back-ends for other search engines and more sophisticated clients are
currently under development.
WHAT IS AutoSearch?
-------------------
WWW::Search's primary client is AutoSearch. AutoSearch performs a
web-based search and puts the results set in a web page. It
periodically updates this web page, indicating how the search changes
over time. Sample output from WWW::Search can be found at
<http://www.isi.edu/lsam/autosearch/>. Output format is configurable.
See the man page for AutoSearch details, or Demonstration section
below for the quick-start instructions.
REQUIREMENTS
------------
WWW::Search requires Perl5 and libwww-perl.
For information on Perl5, see <http://www.perl.com>.
For libwww-perl, see <http://www.sn.no/libwww-perl/>.
Both are also available from the Comprehensive Perl Archive
Network (CPAN). Visit <http://www.perl.com/CPAN/> to find a CPAN
site near you.
At this time WWW::Search has been tested with Perl versions 5.002 and
5.003.
AVAILABILITY
------------
The latest version of WWW::Search should always be available from
<http://www.isi.edu/lsam/tools/WWW_SEARCH/>.
WWW::Search is also available as part of CPAN. Visit
<http://www.perl.com/CPAN/> to find a CPAN site near you.
Feedback about WWW::Search is encouraged. If you're using it for a
neat application, please let us know. If you'd like to (or have)
implemented a new back-end for WWW::Search, let us know so we don't
duplicate work.
------------------------------
Date: 25 Aug 1997 12:44:48 GMT
From: pariah@netcomuk.co.uk (The Pariah)
Subject: xisofs v1.1 Perl/Tk interface to mkisofs/cdwrite
Message-Id: <5truo0$pac$1@nadine.teleport.com>
xisofs v1.1
-----------
Available From: http://www.netcomuk.co.uk/~pariah
xisofs is a Perl/Tk interface to mkisofs and cdwrite (tested under
linux). It will allow you to create ISO9660 filesystems and write
them to a supported CDR device from within the same GUI. The
ISO9660 filesystems can also be written directly to a CDROM from
Windows programs such as Elektrosons Gear.
Features:
o Full GUI with tool bar, and context sensitive help
o Supports all features of mkisofs v1.11
o Supports most features of cdwrite 2.0
o Allows projects to be saved and loaded
o User definable defaults for copyright messages etc.
o Free (Under the GNU Public Licience)
Requires (ie not supplied) :
o Perl 5.004
o Ptk 400.202
o mkisofs v1.11
o cdwrite v2.0 (optional - needed to burn CDRs)
History
-------
xisofs v1.1
-----------
New Features :-
+ Added support for cdwrite 2.0
+ Added icon bar with balloon help
+ Added status bar
xisofs v1.0
-----------
This was the initial version, written to make mksiofs easier to use.
Features :-
+ GUI Interface via Perl/Tk 400.202
+ Supports all mkisofs parameters
+ Allows Defaults of fields to be saved
+ Allows 'projects' to save loaded/saved
+ Context sensitive help for most items by B3 clicking
Rgds
Steve
--
Just like Pariah I have no name, Living in a blaze of obscurity
Need courage to survive the day....
Steve Sherwood <pariah@netcomuk.co.uk>
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 918
*************************************
