[9256] in Perl-Users-Digest
Perl-Users Digest, Issue: 2851 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 11 23:07:15 1998
Date: Thu, 11 Jun 98 20:00:23 -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, 11 Jun 1998 Volume: 8 Number: 2851
Today's topics:
*Simple* MakeMaker question (John Siracusa)
Re: *Simple* MakeMaker question <zenin@bawdycaste.org>
Re: [META] hypersensitivity (was: Re: Command line subs <gburnore@primenet.com>
Re: [META] hypersensitivity (was: Re: Command line subs <gburnore@primenet.com>
Re: [META] hypersensitivity <gburnore@primenet.com>
Re: [META] hypersensitivity <gburnore@primenet.com>
Re: [META] hypersensitivity <gburnore@primenet.com>
Re: access to a hash of lists (Kevin Reid)
Re: Does such a thing exsist? <ljz@asfast.com>
Re: FS/FT: Computer book for sale or trade <angst@scrye.com>
Re: Importing Modules as variables (Charles DeRykus)
Making object accessors efficent <westling@concept5.com>
Re: Making object accessors efficent <tchrist@mox.perl.com>
Re: MODERATION: Time to Vote <gburnore@primenet.com>
Re: MODERATION: Time to Vote <gburnore@primenet.com>
NNTP module <leurmy@akula.com>
open and overwrite query... (Jason Nugent)
Re: open and overwrite query... <tchrist@mox.perl.com>
Re: Opening Files (Kevin Reid)
Starting an Albuquerque area Perl Mongers group <koehler@nm-us.campus.mci.net>
Voting for the new, high-signal perl newsgroup <tchrist@mox.perl.com>
Re: Voting for the new, high-signal perl newsgroup (Bob Trieger)
Re: Voting for the new, high-signal perl newsgroup (John Stanley)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 12 Jun 1998 01:55:23 GMT
From: macintsh@cs.bu.edu (John Siracusa)
Subject: *Simple* MakeMaker question
Message-Id: <6lq1qb$hc1$1@news1.bu.edu>
I'm creating a Perl module that consists of some .pm files and
some .pod files. I want to install this module by typing:
perl Makefile.PL
make
make install
I've spent a month or so playing with the options in MakeMaker
and I have yet to get this to work. Yes, I've pored over all
the relevant documentation. I'm pretty much at the end of my
rope here. For the life of me, I can't imagine what it is
that I'm missing. The only complication is that I don't have
permission to install in the system-wide directories so I've
been setting PREFIX on the command line when creating the
Makefile. Other than that, I just want "make install" to copy
all my .pm and .pod files to their proper directories.
Here's my current setup (fictional names, obviously):
My-Module-0.50/
README
MANIFEST
Makefile.PL
lib/
MyTopLevel.pm
MyTopLevel.pod
MyTopLevel/
Whatever.pm
Whatever.pod
...etc....
That's it. Makefile.PL contains the following:
use ExtUtils::MakeMaker;
WriteMakefile( <stuff> );
Where "stuff" has been an endless combination of options, none
of which has gotten my .pm and .pod files copied out of their
homes to *anywhere.* It seems reasonable that I should only need
a few simple options to get this to work. Say, something like:
WriteMakefile('NAME' => 'MyTopLevel::Whatever',
'VERSION' => '0.50');
But no such luck. Help!
-----------------+----------------------------------------
John Siracusa | If you only have a hammer, you tend to
macintsh@bu.edu | see every problem as a nail. -- Maslow
------------------------------
Date: 12 Jun 1998 02:12:06 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: *Simple* MakeMaker question
Message-Id: <897618013.315322@thrush.omix.com>
[posted & mailed]
John Siracusa <macintsh@cs.bu.edu> wrote:
: I'm creating a Perl module that consists of some .pm files and
: some .pod files. I want to install this module by typing:
: perl Makefile.PL
: make
: make install
>snip<
h2xs -AX -n My::Module
Always, always, always start with h2xs when creating
new modules, even if you're not using any C.
--
-Zenin
zenin@archive.rhps.org
------------------------------
Date: 11 Jun 1998 19:15:02 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: [META] hypersensitivity (was: Re: Command line substitution thru subdirectories)
Message-Id: <6lq2v6$c6e@nntp02.primenet.com>
On 10 Jun 1998 14:55:08 GMT in article <6lm6oc$4kr$2@info.uah.edu>, Greg Bacon <gbacon@cs.uah.edu> wrote:
: In article <6ll0it$l5n@mozo.cc.purdue.edu>,
: gebis@albrecht.ecn.purdue.edu (Michael J Gebis) writes:
: : You know, there was a time when I used to auto-select your posts.
: :
: : *plonk*
: It's really disheartening to see such a high population of
: hypersensitive crybabies in this newsgroup. I'll be glad when the first
: of July has come and gone.
Another example of why clpm should be voted down. This is one of the
proplsed moderators.
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: 11 Jun 1998 19:16:01 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: [META] hypersensitivity (was: Re: Command line substitution thru subdirectories)
Message-Id: <6lq311$c7o@nntp02.primenet.com>
<6lpg5f$iju$3@info.uah.edu>
Organization: Primenet (602)416-7000
Distribution:
X-Comments: SPAM is not UCE but both suck
X-No-Archive: yes
On 11 Jun 1998 20:54:07 GMT in article <6lpg5f$iju$3@info.uah.edu>, Greg Bacon <gbacon@cs.uah.edu> wrote:
: In article <6lp1cs$ls9@mozo.cc.purdue.edu>,
: gebis@albrecht.ecn.purdue.edu (Michael J Gebis) writes:
: : By killfilling him, I'm sacrificing more than he (or
: : anybody) probably will every realize.
: From Hell's Heart, I strike at thee, Face!!! :-)
: What is with the ritualistic announcement that you've killfiled someone
: anyway? It kind of reminds me of the way people strip naked, paint
: their faces, dance around, and kill ticks or other parasites they've
: removed from their bodies.
: Man. Judge. Boots. Mile.
Idiot jerk shouldn't moderate.
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: 11 Jun 1998 19:18:01 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: [META] hypersensitivity
Message-Id: <6lq34p$c9p@nntp02.primenet.com>
On Thu, 11 Jun 1998 16:07:15 +0100 in article <lassehp-1106981607150001@ra.imv.aau.dk>, Lasse =?ISO-8859-1?Q?Hiller=F8e?= Petersen <lassehp@imv.aau.dk> wrote:
: In article
: <uk96o5jsh.fsf@JIMBOSNTSERVER.i-have-a-misconfigured-system-so-shoot-me>,
: jimbo@soundimages.co.uk wrote:
: >Scratchie <upsetter@ziplink.net> writes:
: >> Greg Bacon <gbacon@cs.uah.edu> wrote:
: >> : : You know, there was a time when I used to auto-select your posts.
: >> : It's really disheartening to see such a high population of
: >> : hypersensitive crybabies in this newsgroup. I'll be glad when the first
: >> : of July has come and gone.
: >Even more disheartening is that Mr. Bacon is a moderator should a
: >moderated group become reality.
: Although I believe Mr. Bacon's comment above was unjustified, I am
: confident that as a moderator he will do his job right.
How?
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: 11 Jun 1998 19:22:00 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: [META] hypersensitivity
Message-Id: <6lq3c8$clc@nntp02.primenet.com>
On 11 Jun 1998 18:37:59 GMT in article <6lp867$s25$1@csnews.cs.colorado.edu>, Tom Christiansen <tchrist@mox.perl.com> wrote:
: [courtesy cc of this posting sent to cited author via email]
: In comp.lang.perl.misc, jimbo@soundimages.co.uk writes:
: :I never claimed it was narrow-spread. But to
: :dismiss a particular class of user on the basis of the OS they know
: :and use, maybe because that's all they have ever known and used seems
: :skewed to me.
: The problem, in a nutshell, is that whenever we point out a simple and
: obvious--sometimes even elegant--solution, one which inevitably involves
: gluing together other tools (which, I must point out, was what Perl
: *designed* for), we get back nothing but flames from those who cannot
: help themselves.
No, the problem in a nutshell is not answering a perl question by
complaining about an os. The problem in a nutshell is you.
If you don't want to answer a question because of the OS someone uses, the
shut the fuck up and let someone else answer it. How hard can that be?
Clue: It's not hard, you'd just not have any fun at it.
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: 11 Jun 1998 19:23:01 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: [META] hypersensitivity
Message-Id: <6lq3e5$clr@nntp02.primenet.com>
On 11 Jun 1998 20:40:51 GMT in article <6lpfcj$iju$1@info.uah.edu>, Greg Bacon <gbacon@cs.uah.edu> wrote:
: jimbo@soundimages.co.uk writes:
: : gbacon@cs.uah.edu (Greg Bacon) writes:
: : > Have you stopped beating your wife?
: :
: : The observation stands. Why all the anguish?
: I got tired of the same old boring ``ad hominem attacks add nothing to
: your position''. Ad hominem looked really fun, and I wanted to give it
: a whirl.
Liar
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: Thu, 11 Jun 1998 22:33:40 -0400
From: kpreid@ibm.net (Kevin Reid)
Subject: Re: access to a hash of lists
Message-Id: <1dagz0e.c3dg6r19d7g6uN@slip-32-100-246-105.ny.us.ibm.net>
John Cartwright <jcartwright@wans.net> wrote:
> Hello All,
>
> I am trying to get a list representing the first list element in every
> hash element. For example, if
>
> %HoL = (
> "flintstones" => [ "fred", "barney" ],
> "jetsons" => [ "george", "jane", "elroy" ],
> "simpsons" => [ "homer", "marge", "bart" ],
> );
>
> what I would like is a list with ("fred","george","homer")
%HoL = (
"flintstones" => [ "fred", "barney" ],
"jetsons" => [ "george", "jane", "elroy" ],
"simpsons" => [ "homer", "marge", "bart" ],
);
@firsts = map {$_->[0]} values %HoL;
print "@firsts\n";
--
Kevin Reid. | Macintosh.
"I'm me." | Think different.
------------------------------
Date: 11 Jun 1998 22:16:29 -0400
From: Lloyd Zusman <ljz@asfast.com>
Subject: Re: Does such a thing exsist?
Message-Id: <ltogvzbc02.fsf@asfast.com>
carrsha@charlie.cns.iit.edu (Shawn Carroll) writes:
> Those of us who studied in college may remember course work in algorithms. I
> had taken those class and promptly forgotten everything. Well, now that I have
> begun programming for money I realize that some of the more interesting
> techniques may be usefull. What I was wondering if exsited is a book on perl
> along the lines of "Algorithms in C." If such a tome doesn't exsist, I am
> temped to do something along those lines.
I'm not familiar with such a book, and I think it would be a great idea
for you (or someone) to write one.
Keep in mind that the relative efficiencies of certain algorithms
sometimes differ between Perl and C, so you would probably want to
re-benchmark the algorithms that you would present in this proposed
book.
--
Lloyd Zusman ljz@asfast.com
perl -e '$n=170;for($d=2;($d*$d)<=$n;$d+=(1+($d%2))){for($t=0;($n%$d)==0;
$t++){$n=int($n/$d);}while($t-->0){push(@r,$d);}}if($n>1){push(@r,$n);}
$x=0;map{$x+=(($_>0)?(1<<log($_-0.5)/log(2.0)+1):1)}@r;print"$x\n"'
------------------------------
Date: 12 Jun 1998 02:10:58 GMT
From: angst <angst@scrye.com>
Subject: Re: FS/FT: Computer book for sale or trade
Message-Id: <6lq2ni$pj5$1@jelerak.scrye.com>
sun_ra@my-dejanews.com wrote:
: Send me your best offer or trade.
: CGI Primer Plus For Windows Mohammed J. Kabir, Waite Group Press
I'll give you "Programming Perl, 2nd ed." by Wall, Christiansen, and Schwartz
in trade for your book and $39.95, plus shipping.
--
Erik Nielsen <eln@rmci.net>
mail to above (rather than header address) is answered significantly faster.
this post != views of anyone at all, really
"You are like...unix GOD" -- local tech support
------------------------------
Date: Fri, 12 Jun 1998 01:39:22 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: Importing Modules as variables
Message-Id: <EuF0LM.I8D@news.boeing.com>
In article <3580026F.5585@verio.net>, pat mercer <pmercer@verio.net> wrote:
>when importing modules into a script, is there any way to import the
>module as a variable name? for instance,
>
> $module_name = "My_module";
>
> use $module_name; # instead of use My_module;
>
>i receive a syntax error when i try to implement the above.
>
>only reason i'm asking is because we're using perl for a large project
>involving LOTS of modules, but only *ONE* module will be used per run.
>it would be real nice if we could retrieve the module name from a hash
>and then import it, say ...
>
> use $modules{$module_name}; # this would be VERY NICE
>
>has anybody tried this before? any success stories? any workarounds?
>
>
Another possibility as of 5.004 is the authouse pragma which
postphones module loading until a module is used - perldoc
autouse.
So, instead of parameterizing, you could say, e.g,
use autouse 'module1' => qw(method1 method2);
use autouse 'module2' => qw(method3 method4);
...
to avoid the overhead of loading unused modules.
HTH,
--
Charles DeRykus
------------------------------
Date: Thu, 11 Jun 1998 22:15:38 -0400
From: "Mark Westling" <westling@concept5.com>
Subject: Making object accessors efficent
Message-Id: <6lq31c$e4h1@catch22.concept5.com>
I'm implementing objects the traditional way, via hashes, and I'm trying to
find a more efficient way of creating accessor methods. I'd really, really
like to use accessor functions instead of touching the hash directly, but
when I write
package MyObj;
sub obj_field {
my $this = shift;
@_ ? $this->{obj_field} = shift : $this->{obj_field};
},
$x = $obj->obj_field() runs about eight times slower than $x =
$obj->{obj_field}. With this much penalty, I discovered that don't feel as
nearly as guilty as I thought I would going right to the hash. (Run times
are cut from 60 minutes to 30 minutes.) Is there any way around this?
------------------------------
Date: 12 Jun 1998 02:52:31 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Making object accessors efficent
Message-Id: <6lq55f$b4o$5@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, "Mark Westling" <westling@concept5.com> writes:
:$x = $obj->obj_field() runs about eight times slower than $x =
:$obj->{obj_field}. With this much penalty, I discovered that don't feel as
:nearly as guilty as I thought I would going right to the hash. (Run times
:are cut from 60 minutes to 30 minutes.) Is there any way around this?
Look to the current developer release's use fields and my Dog $spot
material.
--tom
--
X-Windows: The Cutting Edge of Obsolescence.
--Jamie Zawinski
------------------------------
Date: 11 Jun 1998 19:25:00 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: MODERATION: Time to Vote
Message-Id: <6lq3hs$cmn@nntp02.primenet.com>
On 10 Jun 1998 22:36:37 GMT in article <6ln1pl$bfd$1@csnews.cs.colorado.edu>, Tom Christiansen <tchrist@mox.perl.com> wrote:
: [courtesy cc of this posting sent to cited author via email]
: In comp.lang.perl.misc, cberry@cinenet.net (Craig Berry) writes:
: :Care to explain that?
: You really didn't want to ask that. :-( Stanley is just a rabble rouser,
: and now you've gone and roused him.
Translation. Stanley is pointing out a truth that Tom can't handle.
Some of the moderators can't be trusted. THe vote should be no till that
changes.
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: 11 Jun 1998 19:27:00 -0700
From: "Gary L. Burnore" <gburnore@primenet.com>
Subject: Re: MODERATION: Time to Vote
Message-Id: <6lq3lk$cog@nntp02.primenet.com>
On 11 Jun 1998 17:43:15 GMT in article <6lp4vj$stp$1@news.NERO.NET>, John Stanley <stanley@skyking.OCE.ORST.EDU> wrote:
: In article <6lp028$js5$1@ns1.arlut.utexas.edu>,
: Stuart McDow <smcdow@arlut.utexas.edu> wrote:
: >stanley@skyking.OCE.ORST.EDU (John Stanley) writes:
: >>
: >> Gosh, 57 lines, including quotes and headers. What invective. But Tom
: >> has no interest in keeping the discussion civil.
: >
: >Take it to news.groups, please.
: Tom started this thread. Why didn't you tell him the same thing?
Idiots follow blindly other idiots?
--
for i in databasix primenet ; do ; gburnore@$i.com ; done
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DataBasix | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
spamgard(tm): zamboni | ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
http://www.databasix.com | Official Proof of Purchase
===========================================================================
------------------------------
Date: Thu, 11 Jun 1998 22:27:35 -0400
From: Francois <leurmy@akula.com>
Subject: NNTP module
Message-Id: <35809217.9A076942@akula.com>
I can't get a simple script to connect to my ISP's newsserver using
NNTP. Does any one have a possible reason why?
As far as I'm concerned, my program works fine. I just can't connect.
I called my ISP who told me that all the modules are properly installed.
Thanks in advance.
Francois
------------------------------
Date: 12 Jun 1998 02:04:16 GMT
From: ap958@chebucto.ns.ca (Jason Nugent)
Subject: open and overwrite query...
Message-Id: <6lq2b0$dbl$1@News.Dal.Ca>
Hi folks,
this has been bothering me for a while now and I figured I would
ask. I've been trying to open a file using the standard open() command so
that I can read it in and then overwrite it all at once. Is there a
open() modifier that lets you this?
open(HANDLE,"file") or die "$!"; # read mode only
open(HANDLE,"<file") or die "$!"; # ditto
open(HANDLE,"<file") or die "$!"; # write mode only
open(HANDLE,"+<file") or die "$!"; # read and append mode?
open(HANDLE,">>file") or die "$!"; # append mode
The one that seems to offer promise is
open(HANDLE,"+>file") or die "$!";
but it munges the file before I get to read it. Is there a way to
read the contents in, and then overwrite the file? I've gone around and
tried using $^I to create a backup file, but it would be nice if there was
a single step solution to this (I can dream, can't I? :)
Reason why - I want to make sure a file isn't accessed until I
have opened it and updated it. I'm worried that if I have to close and
reopen in write mode I will overwrite other accesses to the file.
Thanks to all,
Jason
--
---------------------
Jason Nugent, BSc(Hons)
ap958@chebucto.ns.ca "This is who we are."
jason@irt.org
Certified Webmaster
Visit IRT.org - Internet Related Technologies - http://www.irt.org
Articles on all aspects of internet development, including -
CGI/Perl, CSS, JavaScript, dHTML, Java, XML, HTML
********************************************************************
The Best Place for Sport on the net! - Sportscience www.sportsci.org
********************************************************************
------------------------------
Date: 12 Jun 1998 02:22:24 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: open and overwrite query...
Message-Id: <6lq3d0$b4o$2@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
ap958@chebucto.ns.ca (Jason Nugent) writes:
: this has been bothering me for a while now and I figured I would
:ask. I've been trying to open a file using the standard open() command so
:that I can read it in and then overwrite it all at once. Is there a
:open() modifier that lets you this?
It's discussed in question 2 of section 5 of the fine perlfaq.
--tom
--
Emacs is a fine programming language, but I still prefer perl.
------------------------------
Date: Thu, 11 Jun 1998 22:33:37 -0400
From: kpreid@ibm.net (Kevin Reid)
Subject: Re: Opening Files
Message-Id: <1dagyit.1e7u3yj1jpmanaN@slip-32-100-246-105.ny.us.ibm.net>
Tom Harrington <tph@longhorn.uucp> wrote:
> F.Quednau (quednauf@nortel.co.uk) wrote:
> : ted wrote:
> : >
> : > How would I open and read all the files in a folder without
> : > naming the files in my script? I'm working with Macperl.
>
> <snip>
>
> : It took me 1 minute to answer your question, but almost 30 minutes to
> : get the conditional right. I know, this is not a Perl question, but why
> : are the following two conditionals not equivalent? Let me answer this
> : myself...
>
> : if ($file ne "." || $file ne "..")
>
> OTOH, this would work:
>
> if($file ne "." && $file ne "..")
>
> As it happens, Ted doesn't even need the conditional, as long as
> he confines the script to MacPerl. Macs don't have the Unix "."
> and ".." (though I believe that Perl functions like chdir have been
> hacked to interpret them properly). It won't hurt to leave them
> in, though, since I don't think you can legally use either of those
> as filenames on a Mac.
Actually, you can use "." or ".." as a filename. The only time you need
to worry about periods at the beginnings of filenames is if you're using
Mac OS <7.0.
The only disallowed character is a colon, since that is the pathname
separator.
--
Kevin Reid. | Macintosh.
"I'm me." | Think different.
------------------------------
Date: Thu, 11 Jun 1998 20:42:26 -0600
From: "Rick Koehler" <koehler@nm-us.campus.mci.net>
Subject: Starting an Albuquerque area Perl Mongers group
Message-Id: <6lq4ig$i4u$1@news.campus.mci.net>
Calling all Albuquerque area perl folks, who might be interested in
getting together to discuss things Perl.
Might as well form a Perl Mongers group, as I suspect there's
enough critical mass around here to do so.
Haven't seen any sign of a Perl user's group in local papers, etc.,
nor is any listed at http://www.pm.org , hence this request.
Rick Koehler
------------------------------
Date: 12 Jun 1998 02:26:24 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Voting for the new, high-signal perl newsgroup
Message-Id: <6lq3kg$b4o$3@csnews.cs.colorado.edu>
Anyone who *really* wants to know whom to trust or distrust in this
ridiculous dispute is strongly encouraged to quietly consult Deja News
and judge for themselves. I suggest calling up author profiles of the
most vocal of the belligerents here and taking a quick skim at their
contributions to the world, to USENET, and to Perl.
Let their own words speak for them.
And let's please keep this to news.groups where it belongs.
--tom
--
The software required `Windows 95 or better', so I installed Linux.
------------------------------
Date: Fri, 12 Jun 1998 02:38:17 GMT
From: sowmaster@juicepigs.com (Bob Trieger)
Subject: Re: Voting for the new, high-signal perl newsgroup
Message-Id: <6lq4dv$lt3$4@strato.ultra.net>
[ posted and mailed ]
tchrist@mox.perl.com (Tom Christiansen) wrote:
-> Anyone who *really* wants to know whom to trust or distrust in this
-> ridiculous dispute is strongly encouraged to quietly consult Deja News
-> and judge for themselves. I suggest calling up author profiles of the
-> most vocal of the belligerents here and taking a quick skim at their
-> contributions to the world, to USENET, and to Perl.
->
-> Let their own words speak for them.
I did the other day and probably noticed and feel the same way you do.
-> And let's please keep this to news.groups where it belongs.
It's discussion on perl newsgroups which is equivalent to "misc" in my book.
Besides that, I don't follow news.groups but I do follow clpm.
Bob Trieger
sowmaster@juicepigs.com
" Cost a spammer some cash: Call 1-800-239-0341
and hang up when the recording starts. "
------------------------------
Date: 12 Jun 1998 02:54:47 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Voting for the new, high-signal perl newsgroup
Message-Id: <6lq59n$bib$1@news.NERO.NET>
In article <6lq3kg$b4o$3@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> wrote:
>Anyone who *really* wants to know whom to trust or distrust in this
>ridiculous dispute is strongly encouraged to quietly consult Deja News
>and judge for themselves. I suggest calling up author profiles of the
>most vocal of the belligerents here and taking a quick skim at their
>contributions to the world, to USENET, and to Perl.
Tom, you have been around long enough to know better. Not everything
someone contributes to perl, the world, or USENET appears in DejaNews,
nor is it relevant. This is almost as disengenuous as your rant about
not having seem me answer questions here when you have made great noises
in the past about me being in your killfile.
It's also disengenuous to try to make this an issue of trusting the
opponents, since they are not trying to gain a position of trust.
But then, your suggestion is a two edged sword, as likely to cut you as
those you swung at.
>And let's please keep this to news.groups where it belongs.
It's ok for you to post about this here, but nobody else?
Now you can take it to news.groups, if you want. I won't break
netiquette by setting followups without saying so.
------------------------------
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 2851
**************************************
