[33072] in Perl-Users-Digest
Perl-Users Digest, Issue: 4348 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Jan 13 03:09:18 2015
Date: Tue, 13 Jan 2015 00:09:02 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 13 Jan 2015 Volume: 11 Number: 4348
Today's topics:
Re: Question on file glob operator. <rweikusat@mobileactivedefense.com>
Re: Twelve Drummers Drumming <rweikusat@mobileactivedefense.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 12 Jan 2015 16:02:08 +0000
From: Rainer Weikusat <rweikusat@mobileactivedefense.com>
Subject: Re: Question on file glob operator.
Message-Id: <874mrw56nz.fsf@doppelsaurus.mobileactivedefense.com>
Robbie Hatley <see.my.sig@for.my.address> writes:
> I just discovered the "file glob operator". (Been reading
> "Programming Perl".) It seems to do most of what opendir,
> readdir, closedir do, more concisely.
Not really: It reads 'some parts of a directory hierarchy' in order to
generate a list of filenames matching some pattern. That's mostly useful
for 'easily' accessing a set of files known to exist whose names follow
a common pattern. It's not really suitable for determining which files
exist and there are some other pitfalls, eg,
[rw@doppelsaurus]~#perl -de 0
Loading DB routines from perl5db.pl version 1.33
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
main::(-e:1): 0
DB<1> p scalar(</../*>)
/../bin
DB<2> p scalar(@a = </../*>)
25
DB<3> p scalar(@a = </../*/../*>)
550
DB<4> p scalar(@a = </../*/../*/../*>)
12100
DB<5> p scalar(@a = </../*/../*/../*/../*>)
266200
------------------------------
Date: Mon, 12 Jan 2015 15:44:07 +0000
From: Rainer Weikusat <rweikusat@mobileactivedefense.com>
Subject: Re: Twelve Drummers Drumming
Message-Id: <878uh857i0.fsf@doppelsaurus.mobileactivedefense.com>
George Mpouras <gravitalsun@hotmail.foo> writes:
> On 9/1/2015 20:28, Ted Zlatanov wrote:
> ich have no relation to the problem at hand whatsoever
>>
>> I think you mean "one thousand, two hundred and seventy-three"[1]
>>
>
> just for the quriosty, how does the 1273 comes concerning the code
> efficiecly and quality ;
In the context of an example someone programmed and posted for fun?
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#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 V11 Issue 4348
***************************************
