[10901] in Perl-Users-Digest
Perl-Users Digest, Issue: 4502 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Dec 27 19:07:16 1998
Date: Sun, 27 Dec 98 16:00:22 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 27 Dec 1998 Volume: 8 Number: 4502
Today's topics:
Re: ------What should I use as a Win32 perl interpreter <gellyfish@btinternet.com>
Re: Accessing Databases <gpeake@wt.net>
Re: ActivePerl perlscript and IIS tenthousand@geocities.com
Re: Anyone have a workaround for crippled ActiveState p (Bbirthisel)
Domain Name Redirection <phil@mediakitchen.ca>
Re: Domain Name Redirection <gellyfish@btinternet.com>
Re: Domain Name Redirection (Clay Irving)
GUI Perl Debugger <cobalt@dircon.co.uk>
Re: GUI Perl Debugger (Honza Pazdziora)
Re: GUI Perl Debugger <ajohnson@gatewest.net>
Re: GUI Perl Debugger (brian moore)
LWP, getstore <mlabor@sprintmail.com>
Re: LWP, getstore <jeff@vpservices.com>
Re: LWP, getstore dturley@pobox.com
Re: mkdir and -p <gellyfish@btinternet.com>
need help <iflynx@blazenet.net>
need Perl Programmer in Dayton Ohio Area <sunshine@infinet.com>
newbie <iflynx@blazenet.net>
Re: Newbie:Basic Troubleshooting <gellyfish@btinternet.com>
Pacman anyone? <zsoris@post.uwstout.edu>
Re: Problem writing a file from web browser <zsoris@post.uwstout.edu>
Re: Retrospective on comp.lang.perl.moderated? <rra@stanford.edu>
Re: Retrospective on comp.lang.perl.moderated? <rra@stanford.edu>
Uninitialized value error <tim.hicks@iname.com>
Re: use base <paul@miraclefish.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Dec 1998 16:45:56 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: ------What should I use as a Win32 perl interpreter-----
Message-Id: <765o84$1kn$1@gellyfish.btinternet.com>
On 26 Dec 1998 14:22:05 -0800 Randal L. Schwartz <merlyn@stonehenge.com> wrote:
>>>>>> "Geir" == Geir Magnusson <gmj@netaxis.com> writes:
>
> Geir> QnJldHQgU3VtbWVyZXIgd3JvdGU6DQoNCj4gICAgICAgICBSaWdodCBub3cgSSB1c2UgQWN0
> Geir> aXZlUGVybCwgYmVjYXVzZSBpdCdzIGZyZWUuICBBbnkgb3RoZXINCj4gaWRlYXM/ICBBbHNv
<snip base64 stuff>
>
> No, I'm quite sure that *won't* work as a win32 perl interpreter.
> Try again.
>
Hmm it looked like this:
On Sat, 26 Dec 1998 18:02:50 +0000 Geir Magnusson Jr. <gmj@netaxis.com> wrote:
> Brett Summerer wrote:^M
> ^M
>> Right now I use ActivePerl, because it's free. Any other^M
>> ideas? Also, does anyone know where I can find a decent book on^M
>> getting perl scripts to run on a NT box? All of the ones that I found^M
>> are written with UNIX in mind. I do my development on Sparqs, but our^M
>> web server is Domino on NT.^M
>>^M
>> -Brett Summerer^M>> summere1@pilot.msu.edu^M
> ^M
> What about getting and compiling the regular distribution? I do that,^M
> and I am happy as a clam.^M
> ^M
here - but I find that tin does a lot of unexpected stuff ;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 27 Dec 98 12:01:38 -0600
From: "Gary Peake" <gpeake@wt.net>
Subject: Re: Accessing Databases
Message-Id: <1224.665T1915T7214463gpeake@wt.net>
adelton@fi.muni.cz scribed to us about Re: Accessing Databases in
comp.lang.perl.misc
>On 26 Dec 98 14:01:49 -0600, Gary Peake <gpeake@wt.net> wrote:
>> Can someone point me to a perl/cgi program that will allow me to
>> access mSQL database on my web host?
>Basically (code untested):
> use DBI; ## this is _the_ database interface in Perl,
> ## get it from CPAN
> my $dbh = DBI-
>connect('dbi:mSQL:database=database;host=web_host',
> 'user', 'password') or die $DBI::errstr;
> ## this creates you the database handle
> my $sth = $dbh->prepare('select * from mytable') or die
> $dbh->errstr;
> ## this prepares a SQL statement
> $sth->execute(); ## this executes is
> while (my @data = $sth->fetchrow_array)
> { ## and here we fetch and print the databa from
> ## the select
> print "@data\n";
> }
>Man page DBI(3) and DBD::mSQL(3) will be very helpfull.
>Hope this helps,
Thanks, it gets me in the right direction.
--
Gary Peake PLEASE NOTE NEW EMAIL ADDRESS!!
Team AMIGA - OwlNet Net
gary@owlnet.net
http://www.owlnet.net (coming soon)
------------------------------
Date: Sun, 27 Dec 1998 22:00:40 GMT
From: tenthousand@geocities.com
Subject: Re: ActivePerl perlscript and IIS
Message-Id: <766am7$5gt$1@nnrp1.dejanews.com>
In article <764120$r6o$1@fir.prod.itd.earthlink.net>,
"MoBetta" <mobetta@conquestcreations.com> wrote:
> You can use ActivePerl build 507 and later to run perlscript in ASP pages.
I know. I got that version on my PC with Win95 and PWS, and there it works
fine. However, whenever I try to install a version of AP later than build 502
on one of our NT servers, it just refuses to do the ASP PerlScript pages... I
always need to re-install build 502, anything later is not accepted...
> The only problem I've encountered is
> with arrays using the @ symbol. If you define all the script on the page
> witn <@! Language....> beginning of the page, the ASP will return with the
> error that only 1 @ is allowed.
;-)
Well, just do the right thing and define all your variables with "my", like
you should do anyway.
BVH
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 27 Dec 1998 22:25:37 GMT
From: bbirthisel@aol.com (Bbirthisel)
Subject: Re: Anyone have a workaround for crippled ActiveState perl -- fork()
Message-Id: <19981227172537.01016.00002106@ng-fq1.aol.com>
Hi Hutch:
>if you try to open COM1 to read in one process and to write in another
>process, one or the other process will be denied permission. I'm still
>trying to find the Win98/NT equivalent magic to let me past this.
If you are trying to do two separate "opens", you will need a lot of
patience. Win32 won't let you do that (can't blame ActiveState for
that one). However, on Win32, the read and write operations are
mostly independent and the serial driver can treat them as if they
are in separate threads by using background I/O (asynchronous).
Both operations can occur in parallel. I haven't tried to emulate
"fork-like" behavior in Win32::SerialPort - but it might be possible
to open a child process with a pipe for input or output and do the
"open" and other direction in the child. Let me know what you find
(especially if it works- so I can add it to the docs ;-)
-bill
Making computers work in Manufacturing for over 25 years (inquiries welcome)
------------------------------
Date: Sun, 27 Dec 1998 13:01:48 -0800
From: Phil De Paulis <phil@mediakitchen.ca>
Subject: Domain Name Redirection
Message-Id: <3686A03C.7A36@mediakitchen.ca>
Hi,
We own two domains and they are
both pointing to the same IP number.
What I would like to do is redirect a
domain name to a url that falls on
another domain. For example if I
typed apples.com i would like
it to go to mydomain.com/test/
What would be the way to achive something
like this???
Thanks in advance
Mr.PHil =)
------------------------------
Date: 27 Dec 1998 18:50:18 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Domain Name Redirection
Message-Id: <765vha$1ql$1@gellyfish.btinternet.com>
On Sun, 27 Dec 1998 13:01:48 -0800 Phil De Paulis <phil@mediakitchen.ca> wrote:
> Hi,
>
> We own two domains and they are
> both pointing to the same IP number.
>
> What I would like to do is redirect a
> domain name to a url that falls on
> another domain. For example if I
> typed apples.com i would like
> it to go to mydomain.com/test/
>
> What would be the way to achive something
> like this???
>
This kind of thing is often better done by some facility that is provided by
your web server - Apache for instance makes it particularly easy - however
this kind of thing is best asked in a newsgroup that is interested in the
configuration of web servers.
comp.infosystems.www.servers.unix
You could - if you must - create some CGI that does the appropriate
print "Location: some.blah.domain\n\n";
under the required circumstances - this might however be a question more
appropriately asked in a CGI newsgroup.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 27 Dec 1998 17:19:48 -0500
From: clay@panix.com (Clay Irving)
Subject: Re: Domain Name Redirection
Message-Id: <766bq4$512@panix.com>
In <3686A03C.7A36@mediakitchen.ca> Phil De Paulis <phil@mediakitchen.ca> writes:
>We own two domains and they are
>both pointing to the same IP number.
>What I would like to do is redirect a
>domain name to a url that falls on
>another domain. For example if I
>typed apples.com i would like
>it to go to mydomain.com/test/
>What would be the way to achive something
>like this???
(sung to the tune of "Where's the beef?")
Where's the Perl?
Your question smells like HTML.
--
Clay Irving
clay@panix.com
------------------------------
Date: Sun, 27 Dec 1998 21:20:57 -0800
From: "Paul Davies" <cobalt@dircon.co.uk>
Subject: GUI Perl Debugger
Message-Id: <3686a774.0@newsread3.dircon.co.uk>
Does anyone know if there is a windows based perl debugger for Linux? I know
Activestate have released one for Microsoft Windows.
Thanks
Paul
------------------------------
Date: Sun, 27 Dec 1998 22:23:02 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: GUI Perl Debugger
Message-Id: <slrn78dcq7.p86.adelton@aisa.fi.muni.cz>
On Sun, 27 Dec 1998 21:20:57 -0800, Paul Davies <cobalt@dircon.co.uk> wrote:
> Does anyone know if there is a windows based perl debugger for Linux? I know
> Activestate have released one for Microsoft Windows.
$ perl -MCPAN -e shell
cpan> install Devel::ptkdb
...
$ perl -d:ptkdb ./yourscript.pl
Hope this helps,
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
Boycott the Czech Telecom -- www.bojkot.cz
------------------------------------------------------------------------
------------------------------
Date: Sun, 27 Dec 1998 17:12:49 -0600
From: Andrew Johnson <ajohnson@gatewest.net>
Subject: Re: GUI Perl Debugger
Message-Id: <3686BEF1.48A3C878@gatewest.net>
Paul Davies wrote:
!
! Does anyone know if there is a windows based perl debugger for Linux?
! I know Activestate have released one for Microsoft Windows.
you might want to try out DDD (Data Display Debugger), a graphical
front end for a few debuggers, perl support is now included:
ftp://ftp.ips.cs.tu-bs.de/pub/local/softech/ddd/
you'll need motif, or LessTif (0.87 or higher). I built it
using lesstif on my linux box ... looks ok, but I haven't
done any serious playing with it yet.
regards
andrew
------------------------------
Date: 27 Dec 1998 23:45:29 GMT
From: bem@news.cmc.net (brian moore)
Subject: Re: GUI Perl Debugger
Message-Id: <slrn78dhkp.2s2.bem@thorin.cmc.net>
On Sun, 27 Dec 1998 17:12:49 -0600,
Andrew Johnson <ajohnson@gatewest.net> wrote:
> Paul Davies wrote:
> !
> ! Does anyone know if there is a windows based perl debugger for Linux?
> ! I know Activestate have released one for Microsoft Windows.
>
> you might want to try out DDD (Data Display Debugger), a graphical
> front end for a few debuggers, perl support is now included:
>
> ftp://ftp.ips.cs.tu-bs.de/pub/local/softech/ddd/
>
> you'll need motif, or LessTif (0.87 or higher). I built it
> using lesstif on my linux box ... looks ok, but I haven't
> done any serious playing with it yet.
Or you can download static binaries. (I'm behind on my lesstif installs
and I hate Motif.)
I've used it for C and it's pretty swift. Haven't tried perl debugging
in it yet. (The vast majority of my perl debugging is insertion of
'print STDERR' lines usually. :))
--
Brian Moore | "The Zen nature of a spammer resembles
Sysadmin, C/Perl Hacker | a cockroach, except that the cockroach
Usenet Vandal | is higher up on the evolutionary chain."
Netscum, Bane of Elves. Peter Olson, Delphi Postmaster
------------------------------
Date: Sun, 27 Dec 1998 13:06:32 -0500
From: "Manual Labor" <mlabor@sprintmail.com>
Subject: LWP, getstore
Message-Id: <765suj$6d7$1@fir.prod.itd.earthlink.net>
I am trying to download the following file -- wotw.zip.
This code:
use LWP::Simple;
getstore
("ftp://ftp.gamepower.com/pub/gamepower/mame/wotw.zip","wotw.zip");
does not give any errors, but it also doesn't download the file
thanks for any help
------------------------------
Date: 27 Dec 1998 19:33:57 GMT
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: LWP, getstore
Message-Id: <36868AB5.14A38325@vpservices.com>
Here's a sample script that does what yours doesn't - it checks for
error and status messages. If everything works, it will report [200:
OK], otherwise it will report something like [404: Not Found]. My guess
is that your error has something to do with the fact that you are trying
to get a file via ftp without sending any username/password information.
#!/usr/local/bin/perl -w
# Fetch a remote file
use strict;
use LWP::Simple;
my $remote_file = shift || '';
my $local_file = shift || '';
if(!$local_file){
print "\nSYNTAX: getfile.pl <remote_file> <local_file>\n";
exit;
}
print "\nFetching $remote_file ...\n";
my $result_code = &getstore( $remote_file, $local_file ) ;
print "[$result_code: ",status_message($result_code),"]\n";
__END__
Hope this helps,
- Jeff Zucker
Manual Labor wrote:
>
> I am trying to download the following file -- wotw.zip.
>
> This code:
>
> use LWP::Simple;
> getstore
> ("ftp://ftp.gamepower.com/pub/gamepower/mame/wotw.zip","wotw.zip");
>
> does not give any errors, but it also doesn't download the file
>
> thanks for any help
------------------------------
Date: Sun, 27 Dec 1998 20:52:08 GMT
From: dturley@pobox.com
Subject: Re: LWP, getstore
Message-Id: <7666ln$2iq$1@nnrp1.dejanews.com>
In article <765suj$6d7$1@fir.prod.itd.earthlink.net>,
"Manual Labor" <mlabor@sprintmail.com> wrote:
> I am trying to download the following file -- wotw.zip.
>
> This code:
>
> use LWP::Simple;
> getstore
> ("ftp://ftp.gamepower.com/pub/gamepower/mame/wotw.zip","wotw.zip");
>
> does not give any errors, but it also doesn't download the file
This is just a guess, but the docs say this:
getstore($url, $file)
Gets a document identified by a URL and stores it in
the file. The return value is the HTTP response code.
^^^^^^^^^^^^^^^^^^
If the return value is an HTTP response code, perhaps the module doesn't use
FTP. Why don't you check the return value?
____________________________________
David Turley
dturley@pobox.com
http://www.binary.net/dturley/
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 27 Dec 1998 16:40:35 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: mkdir and -p
Message-Id: <765nu3$1kj$1@gellyfish.btinternet.com>
On Sun, 27 Dec 1998 15:29:54 GMT webmaster@skatesearch.com wrote:
>
>
> I'd like to invoke mkdir -p from perl. I know I can shell it out to do this,
> but is there a way to do this from the built in version fo mkdir in perl?
>
You can use system() to create a directory hierarchy with mkdir -p or
alternatively you can use the module File::Path which allows you to
create more than one level of directory tree even if your OS cant deal with
that.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sun, 27 Dec 1998 18:53:50 -0500
From: "Ian Falcone" <iflynx@blazenet.net>
Subject: need help
Message-Id: <yKzh2.3156$ya2.14515@news14.ispnews.com>
Hi all,
I am interested in learning how to program with Perl, but I have no
experience with programming at all. I bought a book on the Internet called
Perl5 for Dummies and read the first 5 chapters so far and this really is
fascinating to me. I am interested in some feedback from more experienced
Perl people who can lead me in the right direction. If anyone has any
helpful recommendations as far as what is the best way to learn Perl, I am
all ears.
Thanks,
Ian F
iflynx@blazenet.net
------------------------------
Date: Sun, 27 Dec 1998 15:08:40 -0500
From: "Steve Sunshine" <sunshine@infinet.com>
Subject: need Perl Programmer in Dayton Ohio Area
Message-Id: <Aqwh2.141$Oc.305@news2>
Looking for a very good perl programmer for some program development work in
the Dayton Ohio area. Sorry but only local programmers please respond.
Must be available immediately.
Please send hourly fee and urls of sample work.
Thanks
Steve
sunshine@infinet.com
------------------------------
Date: Sun, 27 Dec 1998 18:50:04 -0500
From: "Ian Falcone" <iflynx@blazenet.net>
Subject: newbie
Message-Id: <%Gzh2.3155$ya2.13537@news14.ispnews.com>
Hi all,
I am interested in learning how to program with Perl, but I have no
experience with programming at all. I bought a book on the Internet called
Perl5 for Dummies and read the first 5 chapters so far and this really is
fascinating to me. I am interested in some feedback from more experienced
Perl people who can lead me in the right direction. If anyone has any
helpful recommendations as far as what is the best way to learn Perl, I am
all ears.
Thanks,
Ian F.
------------------------------
Date: 27 Dec 1998 20:09:51 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Newbie:Basic Troubleshooting
Message-Id: <76646f$22n$1@gellyfish.btinternet.com>
On Sun, 27 Dec 1998 10:02:46 -0500 Kevin Diffily <kdiffily@mail.together.net> wrote:
> I have been trying to get various scripts to runon an Apache Server and
> have run into problems debugging some. Aside from the obvious checking
> of correct paths and permissions how does one start the debugging
> process? I know this is a tall order to fill but any help is
> appreciated.
> The current script I am having trouble with returns a Server 500 error
> from my browser yet returns almost perfect web page code via Telnet
> except that unintended line spaces exist within some of the URLs.
>
You might want to look at the Idiots Guide to CGI proble solving at:
http://www.perl.com/CPAN/doc/FAQs/cgi/idiots-guide.html
Despite the title it is actually a useful guide to sorting out CGI problems
with special reference to Perl programs (of course).
As as start (and if you are using CGI.pm as you are probbably advised to)
you might try putting:
use CGI::Carp qw(fatalsToBrowser);
at the beginning of your script in order to get some useful diagnistic
informaqtion to the browser.
If you are not using CGI.pm (and I really recommend you should :) then you
might putting something like this at the beginning of your script:
BEGIN {
$SIG{__WARN__} = $SIG{__DIE__} = sub { print "Content-type: text/plain\n\n";
print @_,"\n";
};
};
And that should print some diagnostice information to your browser too ..
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sun, 27 Dec 1998 17:40:24 -0600
From: Scott Allen Zsori <zsoris@post.uwstout.edu>
Subject: Pacman anyone?
Message-Id: <766ges$9t9@newsops.execpc.com>
I was just sitting back reading my Camel book when all of a sudden a
word forced a scary little image into my head: a little yellow circle
with a pie-piece taken out, roaming around my code eating all my regular
expressions. Does "chomp" remind anyone else of this wonderful little
character? :) Does anyone else dream in whatever language their current
projects are in? Has anyone else ever actually used a programming
command in a non-programming sentence (I greped a friend's last sentence
by accident once :)? Or am I the only crazy one? Just checking and
trying to make everyone's day a little more cheery. :)
Scott Zsori
**********************************
University of Wisconsin- Stout
Assistant Webmaster/Student- Applied Math
Ameritech
Intranet Webmaster/Developer
**********************************
------------------------------
Date: Sun, 27 Dec 1998 17:48:23 -0600
From: Scott Allen Zsori <zsoris@post.uwstout.edu>
Subject: Re: Problem writing a file from web browser
Message-Id: <766gtp$agg@newsops.execpc.com>
Jason Swett wrote:
> Rookie here. On a Unix server, I can run a CGI script via telnet that
> re-writes a little test file. This won't work when run from a browser.
>
> Is there something special that needs to be done to give the browser user
> permissions to re-write the file?
>
> I've used CHMOD to give RWX access to the test file, but that doesn't sem to
> cut it.
>
> Any ideas? Thanks.
I'm note really sure how to fix it, but I might know the problem. When you run a
script from the command prompt, it's running under your username. Therefore only
you need permissions to this file. On the other hand, when running from a web
browser, it's running under a different name (possibly that of nobody:nobody),
so the file needs permissions for whatever the server is running as. The
directory it's in might need different permissions as well. I know this is all
cryptic, but I haven't done much on Unix. Someone just kick me if I'm wrong.
Thanks. :)
hth,
Scott Zsori
------------------------------
Date: 27 Dec 1998 09:51:42 -0800
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Retrospective on comp.lang.perl.moderated?
Message-Id: <yl67axjwwh.fsf@windlord.stanford.edu>
John Stanley <stanley@skyking.OCE.ORST.EDU> writes:
> Now, can one of the moderators please explain why this bogus "year end
> reconcilliation" stuff is appropriate for a discussion group about perl?
Meta discussion (discussion about the newsgroup itself) is generally
considered on-topic in any newsgroup, within reason. The thread has
stayed within reason. If it were too extended, we'd probably encourage it
to die out, but it appears to be doing that on its own, which just goes to
show that for the most part people have common sense about where and what
to post and manage it themselves.
That's one of the reasons why, once a moderated group is up and running,
the ongoing moderation task isn't as much work as one might think.
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: 27 Dec 1998 15:47:18 -0800
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Retrospective on comp.lang.perl.moderated?
Message-Id: <ylogopf8qh.fsf@windlord.stanford.edu>
John Stanley <stanley@skyking.OCE.ORST.EDU> writes:
> I was not aware that having a "considerably lower traffic load" sans any
> other distinguishing factor (e.g. better discussions, higher S/N) was a
> valid reason for creating a new USENET newsgroup.
I think it is in some circumstances.
> I would consider such a group to be a failure. You can achieve the same
> effect by simply selecting only every 5th or 8th article from the
> original group.
No, you can't, because then you wouldn't get coherent threads. And if you
picked every 5th or 8th thread, you would get threads that would be too
long for your patience. I don't think it's that easy to simulate the
effect via selective reading in a large group.
> Can we end this "year end evaluation" nonsense?
Sure. You and I seem to be the only people still talking about it. I
generally don't follow up to myself. So stop responding to me. :)
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: Sun, 27 Dec 1998 21:31:32 -0000
From: "Tim Hicks" <tim.hicks@iname.com>
Subject: Uninitialized value error
Message-Id: <V2yh2.165$j.259@news-reader.bt.net>
Hello all,
I have written the following, basic script to see if I can produce some sort
of search engine. It all seems to work as I expect, except that as well as
doing what it is supposed to do, it produces the following error message 4
times:
> Use of uninitialized value at search.pl line 30, <TOURN2> chunk 18.
That line is, the one which says:
> if ($record[$col] =~ /$word/i) {
Could anyone enlighten me as to the problem please?
Thank you very much.
Tim
#!/usr/bin/perl -w
use strict;
my $select;
my @record;
my $word;
my $col;
open(TOURN2, "tourndata2.txt") || die "cannot open tourndata2.txt for
reading: $!";
open(TEMP, ">temp.txt") || die "cannot open temp.txt for writing: $!";
print "Here is the template for the database...\n\n";
print "Name|Events|Closing_Date|Start_Date|Venue|Region|Ratings\n";
print " 1 | 2 | 3 | 4 | 5 | 6 | 7\n\n";
print "Choose which field to search using the number codes: ";
chomp ($select=<STDIN>);
$select =~ /([1234567])/ ? searcher($1-1) : print "You input an unexpected
value, please run the search engine again.";
sub searcher {
$col=$_[0];
print "Enter your search word: ";
chomp ($word=<STDIN>);
foreach (<TOURN2>) {
@record = split(/\|/,$_);
if ($record[$col] =~ /$word/i) {
print TEMP $_;
}
}
}
close(TOURN2) || die "cannot close tourndata2.txt: $!";
close(TEMP) || die "cannot close temp.txt: $!";
------------------------------
Date: Sun, 27 Dec 1998 21:19:48 +0000
From: Paul Sharpe <paul@miraclefish.com>
Subject: Re: use base
Message-Id: <3686A474.2D4E6DF6@miraclefish.com>
Kevin Baker wrote:
>
> HI,
>
> does anyone have experience with using this? The man page says that it
> establishes an IS-A relationship with the base class.
>
I use it without any problems. Looks like you have a bug.
> I tried it with this bit of code
>
> package HTML::Customer;
> use strict;
> #require HTML;
> use base qw(HTML);
>
> but get this error message
>
> Can't locate object method "new" via package "HTML::Customer" at
> manilow.pl line 113.
>
Your call to 'new' can't be resolved in HTML::Customer or any of its
superclasses.
> However if I uncomment the require line it works.
Where are HTML::Customer and HTML:: located (on your filesystem)? Have
you run manilow.pl under the -w switch?
>
> Is there any reason why this is happening? If I understand the man page I
> shouldn't need the require, right?
>
Right.
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 4502
**************************************
