[8916] in Perl-Users-Digest
Perl-Users Digest, Issue: 2533 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu May 7 18:07:34 1998
Date: Thu, 7 May 98 15:00:41 -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 Thu, 7 May 1998 Volume: 8 Number: 2533
Today's topics:
Re: "use strict" doesn't like socket/handle, help neede (Mike Heins)
[Help!] Can't find loadable object for module Win32::OD <dlortie@nt.com>
[q] user modified module search path <fis@mpi-sb.mpg.de>
B.S. all this: Re: CPAN & Module gripes (was Re: Ever W <birgitt@order.booktraders.com>
Re: Can You Stop It ? Re: CPAN & Module gripes (was Re: <birgitt@order.booktraders.com>
Re: Connecting to a share <angela_molnar@hp.com>
Re: CPAN & Module gripes (was Re: Ever Wonder...?) <tchrist@mox.perl.com>
Re: CPAN & Module gripes (was Re: Ever Wonder...?) (Clinton Pierce)
Re: CPAN Suggestions (conciliatory) (Randy Kobes)
Re: CPAN Suggestions (conciliatory) (Mike Heins)
Re: Documentation Software for Perl (Eric Weiss)
Does anybody understand $File::Find::prune ?? <lwoolsey@innovative.ca>
Re: Ever Wonder Why Not Everyone Uses Modules? <upsetter@shore.net>
Re: Ever Wonder Why Not Everyone Uses Modules? <upsetter@shore.net>
Re: Ever Wonder Why Not Everyone Uses Modules? <upsetter@shore.net>
Re: Ever Wonder Why Not Everyone Uses Modules? (Chris Nandor)
Re: Ever Wonder Why Not Everyone Uses Modules? (Chris Nandor)
Re: Ever Wonder Why Not Everyone Uses Modules? <jhoglund@mirage.skypoint.net>
Re: Ever Wonder Why Not Everyone Uses Modules? <upsetter@shore.net>
Re: Grieving our dying community (Greg Bacon)
Re: Grieving our dying community (Greg Bacon)
Re: Help Please: How Do I Test A String <rootbeer@teleport.com>
Re: Help Please: How Do I Test A String (Craig Berry)
Re: How many files can I open? <jhoglund@mirage.skypoint.net>
Re: How to clear browser Cache with perl <jhoglund@mirage.skypoint.net>
Re: How to make a "Please wait" page during script proc <aqumsieh@matrox.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 7 May 1998 17:28:12 -0500
From: mikeh@minivend.com (Mike Heins)
Subject: Re: "use strict" doesn't like socket/handle, help needed
Message-Id: <3552276c.0@news.one.net>
Mark Seuffert <captain@pirate.de.nospam-delete-this> wrote:
> Hi,
> I don't know how to call an subroutine with a socket as argument,
> while I "use strict". I tried different ways, but always get
> error messages like:
> Bareword "STDIN" not allowed while "strict subs" in use
> Can't use string ("STDIN") as a symbol ref while "strict refs" in use
> Question: How to call the subroutine "readline"? many many thx! :)
> #!/usr/bin/perl
> use strict;
> $::line = &readline(STDIN,5);
> print $::line;
You have a problem here... A file handle is not a string. You could
munge it and re-point it if you wish, but that is not the way to
handle multiple file handles. It looks also as if you are mixing
references to @fhlist and $_[0] to bad result.
So if you want to do only one file handle use the proper typeglob:
$::line = &readline(\*STDIN,5);
> # Grab a line without using buffered input
> sub readline {
> my ($rin, $win, $ein, $line, $nfound, @fhlist);
> $rin = $win = $ein = '' ;
# @fhlist = split(' ', $_[0]) ;
my $fh = shift(@_);
my $timeout = shift(@_);
vec($rin,fileno($fh),1) = 1;
$nfound = select ($rin, $win, $ein, $timeout); #Set timeout and read response
if($nfound>0) { sysread($fh, $line, 1024) } #Read line if possible
return ($line);
(I must admit I don't understand conserving lines in programming.)
If you want to handle multiple file handles in an array, I suggest
you look at the FAQ. It is possible, but is a pain in the patootie.
--
Mike Heins http://www.minivend.com/ ___
Internet Robotics |_ _|____
Just because something is 131 Willow Lane, Floor 2 | || _ \
obviously happening doesn't Oxford, OH 45056 | || |_) |
mean something obvious is <mikeh@minivend.com> |___| _ <
happening. --Larry Wall 513.523.7621 FAX 7501 |_| \_\
------------------------------
Date: Thu, 07 May 1998 15:51:58 -0400
From: Daniel Lortie <dlortie@nt.com>
Subject: [Help!] Can't find loadable object for module Win32::ODBC error
Message-Id: <355210DE.C547F458@nt.com>
Hi,
Im am getting the following error message when trying to use the Win32::ODBC
module.
I followed all the instruction to install the module (.pm and .pll files).
I try to run the test.pl script and I am getting an
"Can't find loadable object for module Win32::ODBC in @inc ......all lib
paths......"
The error occurs at the use Win32::ODBC line so I assume it is because it can't
find the module but i followed all the instructions for buil 311 of Win32::ODBC.
Please Help!!!
------------------------------
Date: 07 May 1998 22:35:28 +0200
From: Matthias Fischmann <fis@mpi-sb.mpg.de>
Subject: [q] user modified module search path
Message-Id: <y9iu371lsz3.fsf@warren.mpi-sb.mpg.de>
Hi there,
I am currently writing a program consisting of several packages
(.pm-files), and I would like to install it as user and allow several
other users to run it. When I add some 'use lib'-statements at the top
of the main package, the problem is that I have to know the location
where I want to install the program before I actually install it.
What I am looking for is some sort of environment variable
representing @INC and beeing imported by perl from the executing
shell. Or is there some completely new and even more elegant concept I
never heard of?
Thanks for any hints,
yours,
matthias
--
Planck-Institut f|r Informatik | Deutsches Forschungsinstitut f|r KI
fis@mpi-sb.mpg.de | fischman@dfki.de
http://www.mpi-sb.mpg.de/~fis |
------------------------------
Date: Thu, 07 May 1998 16:13:11 -0400
From: Birgitt Funk <birgitt@order.booktraders.com>
Subject: B.S. all this: Re: CPAN & Module gripes (was Re: Ever Wonder...?)
Message-Id: <355215D7.E05F5624@order.booktraders.com>
Chris Nandor wrote:
>
> Since when does CPAN not have keyword searching??
>
> http://theory.uwinnipeg.ca/SFgate/WAIT4CPAN.html
> http://theory.uwinnipeg.ca/search/cpan-search.html
>
> For crying out loud. And people wonder why I am frustrated.
>
Now, I don't understand anything anymore. I finally started
to read the first documentation pages of CPAN.html.
I have no idea what people are complaining about. Many of
the things are explained right away. It's very well
written and it is clearly stated what the upcoming difficulties
might be on the very first page. Links are plentyful. It's even
quite well ordered from the bit I can see so far. And one is warned
about what might be tough or about possilbe pitfalls in the
installation of modules. So, what the hell is this all about ?
O.K. I declare this thread to be ...... (acronyms or four letter
word to be inserted "a votre plaisir") and read the docs.
It's MUCH, MUCH more fun.
Gosh, what a waste of time to read this list if you are a newbie.
Definitely my last post here til I am advanced to speak babytalk
in Perl.
Birgitt Funk
------------------------------
Date: Thu, 07 May 1998 16:41:42 -0400
From: Birgitt Funk <birgitt@order.booktraders.com>
Subject: Re: Can You Stop It ? Re: CPAN & Module gripes (was Re: Ever Wonder...?)
Message-Id: <35521C86.CDDD580B@order.booktraders.com>
Chris Nandor wrote:
>
> In article <3552022A.647609E5@order.booktraders.com>, Birgitt Funk
> <birgitt@order.booktraders.com> wrote:
>
> # The only thing which keeps me going is that fortunately in many of
> # the frustrated answers there is so much valuable information given by
> # Nandor, Christiansen and others, that again, being sad as the whole
> # thread really is, it ends up also being helpful.
>
> Good, I hope that teaches people a lesson. Start by ASKING instead of
> complaining. You get the same information with only one-third the
> emotion.
>
To be fair, I haven't complained at all about CPAN, I was just amazed
about the "climate" of this newsgroup and was confused, sad and upset
about it.
I know already that this is not important anymore to me, as I know
I will find what I need elsewhere and I think I might be able to
post Perl questions when time comes in a way that they will make sense.
And I am a bit more confident, as I know also, that, if I really need
it,
I will get answers.
Birgitt Funk
------------------------------
Date: Thu, 07 May 1998 14:51:58 -0700
From: Angela Molnar <angela_molnar@hp.com>
Subject: Re: Connecting to a share
Message-Id: <35522CFE.7B12@hp.com>
Martien Verbruggen wrote:
> That will depend on what the 'share' is. SMB? NFS? Something else?
>
It is a samba share on a UNIX server.
-Angela
------------------------------
Date: 7 May 1998 20:18:04 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: CPAN & Module gripes (was Re: Ever Wonder...?)
Message-Id: <6it4ts$5pl$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.modules, cpierce1@cp500.fsic.ford.com (Clinton Pierce) writes:
:New people RTFM or are told to use CPAN by c.l.p.m. New people try to
:use CPAN, and if CPAN.pm doesn't work right (100%) there's NO reasonable
:fallback mechanism.
Hello? HTTP and FTP don't work anymore? Hello? The mirrors
are intact. Just because CPAN.pm isn't holding your hand
doesn't mean there's no alternative. Or if it does mean
that because the person isn't competant enough to run their
own Makefile, they certainly aren't safe to be installing modules.
--tom
--
/* And you'll never guess what the dog had */
/* in its mouth... */
--Larry Wall in stab.c from the v4.0 perl source code
------------------------------
Date: Fri, 08 May 1998 21:39:09 GMT
From: cpierce1@ford.com (Clinton Pierce)
Subject: Re: CPAN & Module gripes (was Re: Ever Wonder...?)
Message-Id: <35537a68.1804689077@192.0.0.10>
On 7 May 1998 20:18:04 GMT, Tom Christiansen <tchrist@mox.perl.com>
wrote:
> [courtesy cc of this posting sent to cited author via email]
>
>In comp.lang.perl.modules, cpierce1@cp500.fsic.ford.com (Clinton Pierce) writes:
>:New people RTFM or are told to use CPAN by c.l.p.m. New people try to
>:use CPAN, and if CPAN.pm doesn't work right (100%) there's NO reasonable
>:fallback mechanism.
>
>Hello? HTTP and FTP don't work anymore? Hello? The mirrors
>are intact. Just because CPAN.pm isn't holding your hand
>doesn't mean there's no alternative. Or if it does mean
>that because the person isn't competant enough to run their
>own Makefile, they certainly aren't safe to be installing modules.
I am quite competant to run a Makefile. So are many of the
other responders on this thread. The CPAN gripes I have, and
that others seem to agree on could be solved completely with a
1. dependencies list, available from CPAN, that is accurate,
greppable and (preferably) does not rely on the module author
keeping an accurate description file and (while we're wishing) 2. a
keyword search.
------------------------------
Date: 7 May 1998 20:13:57 GMT
From: randy@theory.uwinnipeg.ca (Randy Kobes)
Subject: Re: CPAN Suggestions (conciliatory)
Message-Id: <slrn6l45t3.65h.randy@theory.uwinnipeg.ca>
On 7 May 1998 17:58:49 GMT, Clinton Pierce <cpierce1@cp500.fsic.ford.com> wrote:
>Ok, since I drew the flames in the "CPAN & Module gripes" thread,
>maybe I can help extinguish them. (I'm NOT retracting my position that
>manual CPAN-spelunking is somewhat worse than annoying-- flames redirected
>to "Message-ID: \<6il13g$cr21@eccws1.dearborn.ford.com\>").
>
>Idea #1:
>
>I'll open with something simple: can the modules be extracted/parsed/
>folded/spindled in some automagic way to extract dependency information?
[ snip ]
>
>Then, the CPAN repository could contain an area where the output of the
>dependency tree is kept, arranged by module of course, all HREF'd so
>that clicking down the dependency tree will download all of the needed
>modules.
>
Hi,
This is possible - an initial attempt to do so is at
http://theory.uwinnipeg.ca/CPAN/depend.html, which lists (most of)
the dependencies of various packages, as well as the required perl
version, if applicable. Extracting this information I found sometimes
tricky, but I think this gets it right most of the time -
modules included in the (current) core perl distribution aren't
included in this listing. This information shows up in a module name or
description search at http://theory.uwinnipeg.ca/search/cpan-search.html
which also, in many cases, brings up a link to an html version
of the relevant pod file.
>Idea #2: suggested by mgm@unpkhswm04.bscc.bls.com (Mitchell Morris) in
> the flame thread.
>
>Implement a search facility in CPAN. This might require that SOMEONE
>host a CGI program to search the database, somewhere. Search on non-perl
>keywords, or simply the texts contained in the embedded documentation
>of the modules. (Of course, build the indexes offline).
>
>
If what's wanted is something beyond the really nice CPAN.pm shell
(perl -MCPAN -e shell), there are a couple of web search interfaces.
The extensive WAIT search of the CPAN module hierarchy, mentioned before
as available through the CPAN.pm shell interface, can also be accessed
through http://ls6.informatik.uni-dortmund.de/CPAN.html (also mirrored at
http://theory.uwinnipeg.ca/SFgate/WAIT4CPAN.html); this searches the
module docs by name, synopsis, text, and/or author. The search utility at
http://theory.uwinnipeg.ca/search/cpan-search.html can also search the
modules hierarchy, though less extensively, as well as other areas of
CPAN.
Ulrich Pfeifer (pfeifer@wait.de) wrote the WAIT stuff - I'm sure he'd
be interested in hearing suggestions, etc. for that, as I would
(randy@theory.uwinnipeg.ca) for the cpan-search.html page here.
--
Best regards,
Randy Kobes
Physics Department Phone: (204) 786-9399
University of Winnipeg Fax: (204) 774-4134
Winnipeg, Manitoba R3B 2E9 e-mail: randy@theory.uwinnipeg.ca
Canada http://theory.uwinnipeg.ca/
------------------------------
Date: 7 May 1998 17:49:15 -0500
From: mikeh@minivend.com (Mike Heins)
Subject: Re: CPAN Suggestions (conciliatory)
Message-Id: <35522c5b.0@news.one.net>
Clinton Pierce <cpierce1@cp500.fsic.ford.com> wrote:
> Ok, since I drew the flames in the "CPAN & Module gripes" thread,
> maybe I can help extinguish them. (I'm NOT retracting my position that
> manual CPAN-spelunking is somewhat worse than annoying-- flames redirected
> to "Message-ID: \<6il13g$cr21@eccws1.dearborn.ford.com\>").
> Idea #1:
> I'll open with something simple: can the modules be extracted/parsed/
> folded/spindled in some automagic way to extract dependency information?
> Possibly looking for things like:
> qw( )
> Module::
> use
> require
> Perl should be able to do this, perl is the only thing that can parse
> perl, after all. :-) If CPAN.pm can do this, then surely there's an
> offline way to accomplish the same task.
Not really -- it would immediately run into problems with things like:
# See if Storable is installed with XSUB. But since it is
# not as reliable, require that an environment var be set.
# If it is, session writes will be about 5X faster
eval {
die unless $ENV{MINIVEND_STORABLE};
require Storable;
import Storable 'freeze';
$Fast_uneval = \&Storable::freeze;
$Eval_routine = \&Storable::thaw;
};
# See if Data::Dumper is installed with XSUB
# If it is, session writes will be about 25-30% faster
eval {
require Data::Dumper;
import Data::Dumper 'DumperX';
$Data::Dumper::Indent = 0;
$Data::Dumper::Terse = 1;
$Pretty_uneval = \&Data::Dumper::DumperX;
$Fast_uneval = \&Data::Dumper::DumperX
unless defined $Fast_uneval;
};
And finally I fall back to an all-perl routine that does
the same thing slower. Unless this parser ignored eval blocks,
it would get things wrong for apps/modules which try to be
portable yet still use modules where appropriate.
> Then, the CPAN repository could contain an area where the output of the
> dependency tree is kept, arranged by module of course, all HREF'd so
> that clicking down the dependency tree will download all of the needed
> modules.
> Idea #2: suggested by mgm@unpkhswm04.bscc.bls.com (Mitchell Morris) in
> the flame thread.
> Implement a search facility in CPAN. This might require that SOMEONE
> host a CGI program to search the database, somewhere. Search on non-perl
> keywords, or simply the texts contained in the embedded documentation
> of the modules. (Of course, build the indexes offline).
I don't understand this one, at least as far as how it is going to
help you do the dependency thing. Personally, I use the big module
list and grep quite a bit, then I go to my bookmark for
CPAN/modules/by-module.
Why don't you mirror CPAN to a local directory, then use CPAN and a
file:// URL? It isn't all that much on a daily basis. It works fine with
CPAN.pm. If you can't get past your firewall, use an offsite PC and a CDR.
There is also a CDROM with the Perl resource kit which has a complete
CPAN mirror. It was a snapshot as of last August, I believe.
> ::::
> I'm not trying to turn CPAN into a point-and-drool facility. Just
> making it somewhat more accessable, and self-documenting. We're all
> developers here, and can appreciate how hard it is to keep README's and
> other documentation all in perfect synch.
I posted a request for people to show me something which does something
similar, commercial or free, and does it better than CPAN. I haven't seen
any pointers to anything yet.
--
Mike Heins http://www.minivend.com/ ___
Internet Robotics |_ _|____
There ain't nothin' in this world 131 Willow Lane, Floor 2 | || _ \
that's worth being a snot over. Oxford, OH 45056 | || |_) |
--Larry Wall <mikeh@minivend.com> |___| _ <
513.523.7621 FAX 7501 |_| \_\
------------------------------
Date: Thu, 7 May 1998 16:30:56 -0400
From: eweiss@winchendon.com (Eric Weiss)
Subject: Re: Documentation Software for Perl
Message-Id: <MPG.fbbe408a2ca27d69896da@news.dgsys.com>
I'm not sure about Perl, but other languages have cross reference
generators, etc. Doing it graphically for Perl would be
difficult because Perl is so platform independent, but you might
be able to use PerlTK for that part.
You might try looking at CPAN (www.perl.org or www.perl.com) to
find a cross reference generator. As a recent thread suggests,
using CPAN efficiently takes some learning. O'Reilly's Perl
module books for Unix might be a help, but they're always
shrink wrapped so I don't know.
Eric
------------------------------
Date: Thu, 7 May 1998 16:13:05 -0400
From: "Les Woolsey" <lwoolsey@innovative.ca>
Subject: Does anybody understand $File::Find::prune ??
Message-Id: <6it55v$qse$1@nr1.ottawa.istar.net>
I'm doing using File::Find and calling the find function to scan all the
files in a directory. I don't want to go below the current directory level
so inside the "wanted" routine I'm setting $File:Find:prune=1;.
On NT under 5.003_07 this works just fine.
But under 5.004_04 under AIX I get entirely different results. I have to
wait until I get passed a directory that is below the current one, then set
prune=1 as above. If I set it sooner, (ie on the current directory), I
don't get the files in this directory.
Either the functionality of this code has changed between revisions of Perl
or it's a variation in the operating systems. Does anybody know which?
Les
------------------------------
Date: 7 May 1998 19:54:03 GMT
From: Art Cohen <upsetter@shore.net>
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <6it3gr$nbf@fridge.shore.net>
Zenin <zenin@archive.rhps.org> wrote:
: The point you're forgetting is that while you may well be able to
: reinvent said wheel in ten minutes, without even looking at the
: (more oftin then not vary well tested code) in the module you're
: inviting many bugs that you haven't thought of and that others
: have already found and fixed.
This is true, but (we've come back around to my original point now) in a
lot of real-world situations I just can't afford to spend x number of
hours learning how to use a new module. There may be something on CPAN
that does exactly what I want, but if I can't find it, learn it, install
it and configure it before I get fired, I'm SOL.
I'm not talking about writing my own code to parse HTML trees, or talk to
an SMTP server... I'm talking about the reason why I communicate with
Sendmail directly and use cgi-lib.pl over CGI.pm 9 times out of 10.
--Art
National Ska/Reggae Calendar: www.ziplink.net/~upsetter/ska/calendar.html
Boston Ska Home Page: www.ziplink.net/~upsetter/ska/index.html
------------------------------
Date: 7 May 1998 19:46:54 GMT
From: Art Cohen <upsetter@shore.net>
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <6it33e$nbf@fridge.shore.net>
Chris Nandor <pudge@pobox.com> wrote:
: # it's not his job too. Think about it, when was the last time you
: # saw an admin ponder, "Hmm, I'm moving my mail server, maybe I should
: # make sure all the header files in my copy of gcc don't need to be
: # adjusted to point to it, and tcl, and everything else on my system".
: # You live in a rose tinted world...
: Depends on the sysadmin. Regardless, whoever is the admin of perl on the
: system is responsible to know to update Net::Config.
I don't know where you work, but in my experience, the "perl admin" (LOL)
is virtually always the sysadmin, and half the time you're lucky if you
can get them to upgrade to the latest version, let alone insure that every
perl module is correctly configured after they've changed something.
--Art
National Ska/Reggae Calendar: www.ziplink.net/~upsetter/ska/calendar.html
Boston Ska Home Page: www.ziplink.net/~upsetter/ska/index.html
------------------------------
Date: 7 May 1998 19:59:00 GMT
From: Art Cohen <upsetter@shore.net>
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <6it3q4$nbf@fridge.shore.net>
Tom Christiansen <tchrist@mox.perl.com> wrote:
: Who wants to read poetry translated? To what purpose? To translate
: poetry carries with it the inevitable doom that its allusions and
: metaphors, its delicate aesthetics and pleasing symmetry, that shall be
: thus destroyed, reduced to a palimpsest--nay, a caricature--of true art.
So if I want to read the Iliad, I should learn Classical Greek? And if I
want to read the Tao Te Ching, I should learn Chinese? And if I want to
read Rilke, I should re-learn German? ... doesn't leave much time to code
Perl.
--Art
National Ska/Reggae Calendar: www.ziplink.net/~upsetter/ska/calendar.html
Boston Ska Home Page: www.ziplink.net/~upsetter/ska/index.html
------------------------------
Date: Thu, 07 May 1998 21:12:09 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <pudge-0705981710170001@192.168.0.3>
In article <6it3q4$nbf@fridge.shore.net>, Art Cohen <upsetter@shore.net> wrote:
# Tom Christiansen <tchrist@mox.perl.com> wrote:
#
# : Who wants to read poetry translated? To what purpose? To translate
# : poetry carries with it the inevitable doom that its allusions and
# : metaphors, its delicate aesthetics and pleasing symmetry, that shall be
# : thus destroyed, reduced to a palimpsest--nay, a caricature--of true art.
#
# So if I want to read the Iliad, I should learn Classical Greek?
To get the most out of it and fully understand it, absolutely.
# And if I
# want to read the Tao Te Ching, I should learn Chinese?
To get the most out of it and fully understand it, absolutely.
# And if I want to
# read Rilke, I should re-learn German?
To get the most out of it and fully understand it, absolutely.
I learned Koine Greek so I could more fully understand the New Testament.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
MacPerl: Power and Ease (ISBN 1881957322), http://www.ptf.com/macperl/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: Thu, 07 May 1998 21:11:09 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <pudge-0705981709160001@192.168.0.3>
In article <6it33e$nbf@fridge.shore.net>, Art Cohen <upsetter@shore.net> wrote:
# Chris Nandor <pudge@pobox.com> wrote:
#
# : Depends on the sysadmin. Regardless, whoever is the admin of perl on the
# : system is responsible to know to update Net::Config.
#
# I don't know where you work, but in my experience, the "perl admin" (LOL)
# is virtually always the sysadmin, and half the time you're lucky if you
# can get them to upgrade to the latest version, let alone insure that every
# perl module is correctly configured after they've changed something.
Fine. Then it works this way:
* your sysadmin changes the name of the mail server
* your sysadmin responsibly lets you know
* you notify him what needs to be changed, where, and how, maybe even making a
diff for him
Is this really that hard? If so, maybe I should become a consultant.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
MacPerl: Power and Ease (ISBN 1881957322), http://www.ptf.com/macperl/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 7 May 1998 21:27:10 GMT
From: Jamie Hoglund <jhoglund@mirage.skypoint.net>
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <6it8ve$ie7$3@shadow.skypoint.net>
Art Cohen <upsetter@shore.net> wrote:
: Is it any wonder why a lot of perl developers don't use pre-written
: modules? Modules are *supposed* to make it easier to accomplish certain
: tasks without getting bogged down in the minutiae of your operating system
: but in this case, it's exactly the opposite. Whereas I could have written
: the "raw" perl code to accomplish the task at hand in about five minutes,
: I've now spent an hour fruitlessly trying to install a module that's
: supposed to make my life easier.
: End of rant.
Yes sir. :-)
For those exact reasons, I seldom (if ever) use a module, I'm far more
likely to look inside a module, figure out how it does whatever it does,
and duplicate it, or do it completely different simply because modules can
be so cranky to get installed. (I will write my own module and use that,
but to me it's just like a library of routines, not objects or anything.)
Just my personal tastes. I don't claim by any stretch of the imagination
to be "right".
I see where you're coming from. :-)
(on my machine, where I have control of what gets installed, things are
much different, I do use modules there.)
Jamie
------------------------------
Date: 7 May 1998 21:14:08 GMT
From: Art Cohen <upsetter@shore.net>
Subject: Re: Ever Wonder Why Not Everyone Uses Modules?
Message-Id: <6it870$2o6@fridge.shore.net>
Chris Nandor <pudge@pobox.com> wrote:
: * your sysadmin changes the name of the mail server
: * your sysadmin responsibly lets you know
: * you notify him what needs to be changed, where, and how, maybe even making a
: diff for him
You left out
* He ignores you, or says "I'll get to that this week" and then doesn't.
These things sometimes happen in real life.
: Is this really that hard? If so, maybe I should become a consultant.
Well, you're obviously far superior in intelligence to virtually everyone
else on the internet, so maybe you should.
--Art
National Ska/Reggae Calendar: www.ziplink.net/~upsetter/ska/calendar.html
Boston Ska Home Page: www.ziplink.net/~upsetter/ska/index.html
------------------------------
Date: 7 May 1998 19:50:29 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Grieving our dying community
Message-Id: <6it3a5$6uk$1@info.uah.edu>
In article <6isq9p$ftr@fridge.shore.net>,
nvp@shore.net (Nathan V. Patwardhan) writes:
: And it's appreciated. But this newsgroup is now composed of 70-80%
: takers, and it's unlikely that they'll ever return the favor.
That estimate is far too conservative. :-(
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: 7 May 1998 19:52:50 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: Grieving our dying community
Message-Id: <6it3ei$6uk$2@info.uah.edu>
In article <6issr5$6rk@mozo.cc.purdue.edu>,
gebis@albrecht.ecn.purdue.edu (Michael J Gebis) writes:
: I'm not saying that the flood of newbie questions doesn't
: get on my nerves, but I think a lot of people who should
: know better are only adding noise and hostility to the mix.
clpmod : clpmisc :: Perl : FORTRAN
:-),
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: Thu, 07 May 1998 20:00:33 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Frank Blanchard <fb@whitaker.org>
Subject: Re: Help Please: How Do I Test A String
Message-Id: <Pine.GSO.3.96.980507125511.18886C-100000@user2.teleport.com>
On Thu, 7 May 1998, Frank Blanchard wrote:
> Subject: Help Please: How Do I Test A String
Please check out this helpful information on choosing good subject
lines. It will be a big help to you in making it more likely that your
requests will be answered.
http://www.perl.com/CPAN/authors/Dean_Roehrich/subjects.post
> i want to test a string to see if it contains any characters other than
> spaces.
You can do that in many many ways in Perl. Here are two.
if ($string =~ tr/ //c) { ... }
if ($string =~ /[^ ]/) { ... }
For information on how these work, check out the perlre and perlop
manpages. Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 7 May 1998 21:50:55 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: Help Please: How Do I Test A String
Message-Id: <6itabv$fuv$2@marina.cinenet.net>
Frank Blanchard (fb@whitaker.org) wrote:
: i want to test a string to see if
: it contains any characters other
: than spaces.
$string =~ /\S/;
\S is the character class of non-whitespace characters, so the regex
above tests true if $string contains any non-whitespace. Note that an
empty string '' will test false, since it has no non-whitespace.
: i tried ne "" and ne " "
: and some other iterations.
Those will test for an empty string, or a string containing a single
space character.
I'd suggest you read the Llama book, or at least perlre.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: 7 May 1998 21:10:07 GMT
From: Jamie Hoglund <jhoglund@mirage.skypoint.net>
Subject: Re: How many files can I open?
Message-Id: <6it7vf$ie7$2@shadow.skypoint.net>
Hans Xie <hans.xie@its.csiro.au> wrote:
: HI,
: It looks like I can only open 60 files for writing. When I try to open more,
: the file is not created, and no complain information send back!
: How to get beyond this limits? I need to open about 200 files for writing.
: I am using PERL 5.004_04 on Solaris 2.5
: Thanks in advance.
: Hans.
Do you really need to have all those files open at the same time? The
simple solution (if possible) is to close the file when done with it.
(then re-open it later if need be)
The complicated solution.. use a module that allows more than xxx files to
be open, or set up some kind of scheme that stores the state information
of a file, opens it, resets the state, then closes it.
Some rexx interpreters do something like this. But it's better to just
close the files you don't need, and re-open them again later if you need
them. IMO of course.
Jamie
------------------------------
Date: 7 May 1998 21:35:18 GMT
From: Jamie Hoglund <jhoglund@mirage.skypoint.net>
Subject: Re: How to clear browser Cache with perl
Message-Id: <6it9em$ie7$4@shadow.skypoint.net>
Joseph Norris <sirron@mail.mcoe.k12.ca.us> wrote:
: Hello listeros,
: Can anyone tell me the way to clear browser cache from a cgi script
: written in perl?
: Thanks. joseph.
Assuming all your cache files are stored in 1 directory, this untested
code might do it. :-)
$CacheDir="browser_cache";
opendir(CACHE,$CacheDir);
@FILES = readdir(CACHE);
closedir(CACHE);
unlink(@FILES);
But you'll probably need a recursive directory reading routine to get all
of them.
Just using rm -rf browser_cache would be much easier IMO.
Doesn't your browser have some sort of "clear cache" option?
Jamie
------------------------------
Date: Thu, 07 May 1998 16:41:20 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: How to make a "Please wait" page during script processing?
Message-Id: <35521C70.D1613FBF@matrox.com>
Randal Schwartz wrote:
> print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
> ## legal fund: $20,990.69 collected, $186,159.85 spent; just 118 more days
> ## before I go to *prison* for 90 days; email fund@stonehenge.com for details
>
> --
> Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
> Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
> Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
> Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
> Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
Hmmm...
Am I the only person that finds Randal's .sig confusing ?!?!
(not to mention amusing!)
--
Ala Qumsieh | No .. not just another
ASIC Design Engineer | Perl Hacker!!!!!
Matrox Graphics Inc. |
Montreal, Quebec | (Not yet!)
------------------------------
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 2533
**************************************
