[12503] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 6103 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jun 23 02:07:26 1999

Date: Tue, 22 Jun 99 23:00:15 -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           Tue, 22 Jun 1999     Volume: 8 Number: 6103

Today's topics:
    Re: [Req:] Date::Abigail (Abigail)
    Re: A month behind using localtime(time) ? (Abigail)
    Re: A month behind using localtime(time) ? (Abigail)
    Re: A month behind using localtime(time) ? (Abigail)
    Re: accessing a character in a string (Abigail)
    Re: Beginner Perl Question (Abigail)
    Re: can you split a word into letters? (Abigail)
        Help with sprintf() esalmon@packet.net
    Re: Help with sprintf() <wyzelli@yahoo.com>
    Re: Help with sprintf() (Larry Rosler)
    Re: HOW DO I PAD A STRING IN PERL?? (Philip 'Yes, that's my address' Newton)
    Re: Language choice for high-volume Oracle CGI interfac <firstsql@ix.netcom.com>
    Re: Statistics for comp.lang.perl.misc (Abigail)
    Re: Statistics for comp.lang.perl.misc (Abigail)
    Re: Summing an array (Mark-Jason Dominus)
    Re: What is First line in Perl5 in Sun Micro... (Abigail)
        Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: 23 Jun 1999 00:29:44 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: [Req:] Date::Abigail
Message-Id: <slrn7n0s61.k1b.abigail@alexandra.delanet.com>

Lee (rlb@intrinsix.ca) wrote on MMCXXII September MCMXCIII in
<URL:news:B395B3DD966822D67F@204.112.166.88>:
"" In article <377027EA.77042D48@mail.cor.epa.gov>,
"" David Cassell <cassell@mail.cor.epa.gov> wrote:
"" 
"" >Lee wrote:
"" >> [an entertaining sub]
"" 
"" Thanks. I just looked it over and found two bugs. I hope this doesn't ruin
"" anyone's production code. :)


O-oh.


Abigail
-- 
srand 123456;$-=rand$_--=>@[[$-,$_]=@[[$_,$-]for(reverse+1..(@[=split
//=>"IGrACVGQ\x02GJCWVhP\x02PL\x02jNMP"));print+(map{$_^q^"^}@[),"\n"


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 23 Jun 1999 00:45:39 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: A month behind using localtime(time) ?
Message-Id: <slrn7n0t3r.k1b.abigail@alexandra.delanet.com>

Mark Conlin (Mark.Conlin@bridge.bellsouth.com) wrote on MMCXXI September
MCMXCIII in <URL:news:376F9BA5.11A9A804@bridge.bellsouth.com>:
@@ ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) =
@@ localtime(time);
@@ 
@@ When I use this command I end up with $mon, being 5, correct me if 
@@ I am wrong but it is June isn't. No big deal I just add one, I was
@@ just wondering why PERL does this.

PERL? We don't know what PERL does. As far as this group is concerned,
PERL doesn't exist. There's perl, and there's Perl, and that's it.

Now, for your question, the answer is longer Xmas holidays. By subtracting
1 from all months, there's no December for a Perl programmer. Hence, (s)he
can stay home all December, to enjoy the season. Larry really thought of
everything when he invented Perl!

@@ Does that mean that January is $mon 0 ?

Ha! That would be too easy. January is 9.


Abigail
-- 
perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 23 Jun 1999 00:47:43 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: A month behind using localtime(time) ?
Message-Id: <slrn7n0t7l.k1b.abigail@alexandra.delanet.com>

Mark Conlin (Mark.Conlin@bridge.bellsouth.com) wrote on MMCXXI September
MCMXCIII in <URL:news:376FAC8E.27ABF233@bridge.bellsouth.com>:
## >    Sigh - why not read the docs to see why this is so?
## > It uses the underlying C library which does the same thing - also
## > documented.
## 
## Becuase I do not have a good book with me right now and in addition
## my connection is so slow that it is almost impossible to search
## through faqs online. 

That's why the faqs come with your distribution of Perl. Clever, isn't?



Abigail
-- 
perl -e '$a = q 94a75737420616e6f74686572205065726c204861636b65720a9 and
         ${qq$\x5F$} = q 97265646f9 and s g..g;
         qq e\x63\x68\x72\x20\x30\x78$&eggee;
         {eval if $a =~ s e..eqq qprint chr 0x$& and \x71\x20\x71\x71qeexcess}'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 23 Jun 1999 00:50:23 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: A month behind using localtime(time) ?
Message-Id: <slrn7n0tcn.k1b.abigail@alexandra.delanet.com>

Mark Conlin (Mark.Conlin@bridge.bellsouth.com) wrote on MMCXXI September
MCMXCIII in <URL:news:376FAECB.7EE7D5B0@bridge.bellsouth.com>:
`` 
`` I don't have a reference book here and my connection is so terrible
`` that it makes using the web faqs impossible. In addition the fact that
`` I did not understand the behavior of a perl command does not mean that
`` I need to switch jobs. 


It's not a matter of not understanding that makes you unsuitable for the
job. It's the fact of not doing trivial research on your own.



Abigail
-- 
perl -weprint\<\<EOT\; -eJust -eanother -ePerl -eHacker -eEOT


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 23 Jun 1999 00:42:28 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: accessing a character in a string
Message-Id: <slrn7n0stt.k1b.abigail@alexandra.delanet.com>

Ariel (fake@nospam.edu) wrote on MMCXXI September MCMXCIII in
<URL:news:7kovfe$osr@news.or.intel.com>:
 .. hi. you know how in C you can say
 .. 
 .. char mystring[ ] = "hello";
 .. char myletter = mystring[1];  #myletter is the character 'e'
 .. 
 .. is there a way to do a similar thing in Perl? how do you access certain
 .. characters in strings?


Here's one way of doing it:

my $text  = "hello";
my $index = 1;
my $py    = "/tmp/hello.py";

open PY, "> $py" or die "Failed to open $py: $!";
print PY <<EOFPY;
#!/opt/python/bin/python
mystring = "$text"
print mystring [$index]
EOFPY
close PY or die "Failed to close $py: $!";
chmod +x $py or die "Failed to chmod $py: $!";

my $letter = `$py`;


It looks a bit complicated, but once you've put this into a module, 
it's easy.




Abigail
-- 
perl -wleprint -eqq-@{[ -eqw\\- -eJust -eanother -ePerl -eHacker -e\\-]}-


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 22 Jun 1999 23:45:06 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Beginner Perl Question
Message-Id: <slrn7n0pia.k1b.abigail@alexandra.delanet.com>

John Paopeng (ppjohn@ncs.com.sg) wrote on MMCXXI September MCMXCIII in
<URL:news:376F5F48.FEC83E6@ncs.com.sg>:
== 
== if you run it under Unix, you can use the system call "date"
== 	$_ = `date`;

Fun. Run your program on Solaris 2.6. Now, upgrade to Solaris 7.
See things change.


Unix is a twisty little maze of tools, all different.



Abigail
-- 
perl -e '$a = q 94a75737420616e6f74686572205065726c204861636b65720a9 and
         ${qq$\x5F$} = q 97265646f9 and s g..g;
         qq e\x63\x68\x72\x20\x30\x78$&eggee;
         {eval if $a =~ s e..eqq qprint chr 0x$& and \x71\x20\x71\x71qeexcess}'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 23 Jun 1999 00:04:22 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: can you split a word into letters?
Message-Id: <slrn7n0qmb.k1b.abigail@alexandra.delanet.com>

Larry Rosler (lr@hpl.hp.com) wrote on MMCXXI September MCMXCIII in
<URL:news:MPG.11d9a8f924e676e2989c24@nntp.hpl.hp.com>:
~~ In article <7kovo9$abg$0@216.39.141.200> on 22 Jun 1999 21:38:17 GMT, 
~~ Fuzzy Warm Moogles <tgy@chocobo.org> says...
~~ > On Tue, 22 Jun 1999 08:09:25 -0700, lr@hpl.hp.com (Larry Rosler) wrote:
~~ > >> In article <slrn7mrfec.k1b.abigail@alexandra.delanet.com>,
~~ > >>   abigail@delanet.com wrote:
~~ > >...
~~ > >> > sub pohc (@) {
~~ > >> >     my $r;
~~ > >> >     foreach my $s (@_  ?
~~ > >> >                    @_  :
~~ > >> >                    $_) {
~~ > >> >         $s = reverse $s;
~~ > >> >         $r = chop    $s;
~~ > >> >         $s = reverse $s;
~~ > >> >     }
~~ > >> >     $r;
~~ > >> > }
~~ ...
~~ > Do not disparage Abigail's reverse chop.  It actually does pretty well,
~~ > beating out the more serious split suggestions.
~~ 
~~ You wrote it a whole lot better.
~~ 
~~ >   Pohc   => sub { local $_ = reverse $word; chop },


No, he didn't. It no longer does what it is supposed to do. I wrote
pohc for that other thread, that wanted the equivalent of chop(), but
then removing the first letter. That is, pohc modifies its argument(s),
falling back to $_ if no argument is given. Neither the regex, nor the
the splits or substr modify the argument. Nor do they work on lists. Or
deal with no arguments at all. There's a reason why pohc is written as
it's written.

The above benchmark is fine if you want to benchmark "how to find the
first character of a string". It's bloody pointless in benchmarking
"the equivalent of chop() that removes from the beginning of the string".

Granted, there are better ways to write pohc(). But I haven't seen them yet.
People should understand the problem space before waving with benchmark.


Abigail
-- 
perl -wle '(1 x $_) !~ /^(11+)\1+$/ && print while ++ $_'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: Wed, 23 Jun 1999 00:21:07 -0400
From: esalmon@packet.net
Subject: Help with sprintf()
Message-Id: <377060B3.4BE5@packet.net>

when I use:
	sprintf ("%d%d%d%d", 1);
	print $_;

the result is:
	1000

when I use:
	sprintf ("%0d%0d%0d%0d", 1);
	print $_;

the result is still:
	1000

How do I get:
	0001

Please reply by email if anyone can help.

Thanks
	Eric R. Salmon


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: Wed, 23 Jun 1999 15:24:36 +0930
From: "Wyzelli" <wyzelli@yahoo.com>
Subject: Re: Help with sprintf()
Message-Id: <nE_b3.177$x9.12863@vic.nntp.telstra.net>

> How do I get:
> 0001
>
> Please reply by email if anyone can help.
>
> Thanks
> Eric R. Salmon
>
>
>   -----------== Posted via Newsfeeds.Com, Uncensored Usenet News
==----------
>    http://www.newsfeeds.com       The Largest Usenet Servers in the World!
> ------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers
==-----

printf ("%04d",1);

() not mandatory.

printf "%04d",1; # this works too

Wyzelli




------------------------------

Date: Tue, 22 Jun 1999 22:52:46 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Help with sprintf()
Message-Id: <MPG.11da15fea564caa0989c2b@nntp.hpl.hp.com>

[Posted and a courtesy copy sent.]

In article <377060B3.4BE5@packet.net> on Wed, 23 Jun 1999 00:21:07 -
0400, esalmon@packet.net <esalmon@packet.net> says...
> when I use:
> 	sprintf ("%d%d%d%d", 1);
> 	print $_;
> 
> the result is:
> 	1000

Not unless you assign the value returned by sprintf to $_.

> when I use:
> 	sprintf ("%0d%0d%0d%0d", 1);
> 	print $_;
> 
> the result is still:
> 	1000

Not unless you assign the value returned by sprintf to $_.

A note to p5p people:  In the above examples, sprintf is reading three 
nonexistent values from its argument list, but there are no warnings.  
Shouldn't there be code to recognize this condition?  (Obviously it is 
turning undef's quietly into zeros.)

> How do I get:
> 	0001

Use sprintf '%.4d'.

There is a new FAQ about this in perlfaq4: "How do I pad a string with 
blanks or pad a number with zeroes?"  The version I just downloaded from 
ActiveState and the version at http://www.perl.com/ still have the 
serious bug that was noted in this newsgroup a while ago.

For this problem, it shows '%04d' instead of the clearly superior 
'%.4d', but at least it's correct.

Oh, you want to know why '%.4d' is clearly superior???

1.  You don't have to explain that sprintf '%010d' isn't an octal 8, 
despite years of understanding 010 otherwise.

2.  You can use specify the field width also:  '%10.4d' means right-
adjust a padded-with-zero-to-four-digits number in a 10-character field, 
padded with leading spaces.  Rather like floating-point specification, 
no?

> Please reply by email if anyone can help.

Why the heck not?

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


------------------------------

Date: Wed, 23 Jun 1999 05:13:22 GMT
From: nospam.newton@gmx.net (Philip 'Yes, that's my address' Newton)
Subject: Re: HOW DO I PAD A STRING IN PERL??
Message-Id: <376fb68f.344922@news.nikoma.de>

On Mon, 21 Jun 1999 19:24:12 GMT, dave@dave.org.uk (Dave Cross) wrote:

>On Mon, 21 Jun 1999 18:42:24 GMT, nospam.newton@gmx.net (Philip 'Yes,
>that's my address' Newton) wrote:
>
>>On Sun, 20 Jun 1999 11:24:12 GMT, dave@dave.org.uk (Dave Cross) wrote:
>>
>>>Was there something in perlfaq4 - "How do I pad a string with blanks
>>>or pad a number with zeroes?" that was unclear?
>>
>>This doesn't seem to be in my copy of perlfaq4 (5.005_02, ActiveState
>>build 509).
>
>Some versions of ActivePerl had a less than ideal documentation tree.
>It's been fixed in the more recents versions so you could grab the
>latest versnio fro the ActiveState site.

I just grabbed & installed build 517 (5.005_03), which ships with
perlfaq4 $Revision: 1.40 $, $Date: 1999/01/08 04:26:39 $. This version
contains the entry you mentioned.

Guess it pays to keep up to date...

Cheers,
Philip
-- 
Philip Newton <nospam.newton@gmx.net>


------------------------------

Date: Tue, 22 Jun 1999 22:42:21 -0700
From: Lee Fesperman <firstsql@ix.netcom.com>
Subject: Re: Language choice for high-volume Oracle CGI interface?
Message-Id: <377073BD.319@ix.netcom.com>

Matt Sergeant wrote:
> 
> Lee Fesperman wrote:
> >
> > Actually, there are a lot of disadvantages to using a 'subset' of a language for
> > specific purpose (like using a subset of Perl for CGI). Assuming you're advocating using
> > a subset of Perl (so you don't have to learn the full blown language), the disadvantages
> > of that approach include:
> >
> > + You must clearly document this subset, carefully leaving out complexities of the
> > language that are not needed. What to include can be a very hard choice to make.
> 
> Why?

Why what? Try ... to enable "using a subset of Perl so you don't have to learn the full 
blown language."

> > + To a user of the subset, many of the elements will be counter-intuitive since they
> > were actually designed for a larger purpose.
> 
> Such as? Please give examples, with comparisons to how Jive does this so
> much better. Don't limit yourself to pure perl, but consider things like
> EmbPerl which do something very similar to Jive (without it's
> limitations).

I gave an example before - cgi name lookup. Jive is a a different animal than Perl (even 
some specialized subset); it has tight integration with database - the language directly 
supports SQL data types, SQL nulls, SQL idioms (between, like, ...), input/output 
parameters, nested queries and more.

> > + Certain aspects of the processing will always be a 'misfit' (impediance mismatch) with
> > the language. For instance, access to CGI variables in Perl always requires an explicit
> > lookup. These aspects will never make 'sense' to the subset user.
> 
> Eh? With Jive you declare:
> 
> input my_form_name
> 
> With perl you generally do:
> 
> param('my_form_name') - CGI.pm
> 
> or with EmbPerl:
> 
> $fdat{my_form_name}
> 
> No explicit lookup. Those seem like perfect matches to me.

That's exactly what I meant -- those are explicit lookups. Similiar to a C function call 
-- cgiLookup("my_form_name"). Also, the dollar sign and braces notation is hardly 
intuitive to experienced developers from other languages.

> > If you are recommending that Perl CGI is a good choice for an experienced developer in
> > Perl, I wholeheartedly agree with you.
> 
> s/ in Perl//;

Another notation that is rare in other languages.
 
> My experience with languages limited to one problem domain is that they
> are just that: Limited.

As if Perl was more than a scripting language! If you want general purpose, try Java (On 
topic !?!), C, Assembly.

--
Lee Fesperman, FFE Software, Inc. (http://www.firstsql.com)


------------------------------

Date: 22 Jun 1999 23:34:54 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <slrn7n0ov6.k1b.abigail@alexandra.delanet.com>

Bart Lateur (bart.lateur@skynet.be) wrote on MMCXXI September MCMXCIII in
<URL:news:377345f6.2736693@news.skynet.be>:
!! Abigail wrote:
!! 
!! >II  * Two capital i's. I've seen this only once, and honestly, I think this
!! >II was a mistake.
!! >
!! >Do you really think I make mistakes like that?
!! 
!! Ack! Again! It looks like you can pick the quoting for your current
!! reply.

vi is a very powerful editor.



Abigail
-- 
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: 22 Jun 1999 23:38:37 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Statistics for comp.lang.perl.misc
Message-Id: <slrn7n0p65.k1b.abigail@alexandra.delanet.com>

Randal L. Schwartz (merlyn@stonehenge.com) wrote on MMCXXI September
MCMXCIII in <URL:news:m1ogi8l3s0.fsf@halfdome.holdit.com>:
'' >>>>> "Greg" == Greg Bacon <gbacon@itsc.uah.edu> writes:
'' 
'' Greg> That's beatable too.  What if she uses different prefixes for each
'' Greg> quoted line?
'' 
'' Maybe Abi deserves to be taken out of the normal mix, and given an
'' honorary "automatically historically excessive" OCR place in the
'' standings.  Item # 0 or something. :)
'' 
'' Maybe what I'm really saying is I don't understand if Abi is using
'' different prefixes just to foul up statistics, or what.  And if so,
'' the stats should just ignore her.  And I don't like having that kind
'' of confusion in my life. :)


Could someone tell what they are using the OCR listing for? Does it show
who are posting FAQs, or something like that? I don't think FAQs are
original content, but Gregs little program thinks they are. Why doesn't
anyone get upset about that, yet they waste long threads about quoting
prefixes?


Abigail
-- 
sub f{sprintf$_[0],$_[1],$_[2]}print f('%c%s',74,f('%c%s',117,f('%c%s',115,f(
'%c%s',116,f('%c%s',32,f('%c%s',97,f('%c%s',0x6e,f('%c%s',111,f('%c%s',116,f(
'%c%s',104,f('%c%s',0x65,f('%c%s',114,f('%c%s',32,f('%c%s',80,f('%c%s',101,f(
'%c%s',114,f('%c%s',0x6c,f('%c%s',32,f('%c%s',0x48,f('%c%s',97,f('%c%s',99,f(
'%c%s',107,f('%c%s',101,f('%c%s',114,f('%c%s',10,)))))))))))))))))))))))))


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

Date: Wed, 23 Jun 1999 05:40:22 GMT
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Summing an array
Message-Id: <7kps0h$ni0$1@monet.op.net>

In article <ylbte7h600.fsf@windlord.stanford.edu>,
Russ Allbery  <rra@stanford.edu> wrote:
>Mark-Jason Dominus <mjd@op.net> writes:
>> But regardless, there's still a loop.  There *has* to be a loop.  The
>> only question is whether you can see it or not.
>
>Not *necessarily*, although yes I'd expect it to be in most applications.
>One of the data structures that I've implemented in the past (in C) had as
>its requirements O(lg N) insert time and O(lg N) item to get the sum of
>all elements from the beginning of the structure to that specific element.
>...
>
>We implemented it as a skip list ...

Yes.  But a skip list is not an array.  If you want to sum the
elements of an array, you have to use a loop.

It seems to me that in the last ten years or so there's been a change
in the way programmers talk about data structures.  

When I learned to program, data structure names like `array' referred
to implementations or particular algorithms.  But it seems that more
and more often, people use names like `array' to refer to interfaces
rather than implementations, and will call anything an array as long
as it supports an indexed access.

Examples: 1.  You say that a loop is not necessary when summing the
elements of an array, and produce a skip list as evidence.

2. Last year I wrote an article in which I said that Perl's

	$x->[$i][$j]

construction was `like' a two-dimensional array.  Several readers took
issue with this and said that it was *in fact* a two-dimensional
array, and also suggested that I would not have said that a C
program's analogous `argv' was `like' a two-dimensional array.  But
they were mistaken; that was exactly what I would have said about
argv.  To me, argv is not a two-dimensional array because it need not
be stored in a single contiguous region of memory.

3. Although I can't remember the specifics, I am sure I have seen
people use the phrase `hash table' when referring to both B-trees and
to tries.

I don't think it was ignorance that caused these; I think the word
`array' itself has changed meaning.



------------------------------

Date: 23 Jun 1999 00:27:28 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: What is First line in Perl5 in Sun Micro...
Message-Id: <slrn7n0s1p.k1b.abigail@alexandra.delanet.com>

David Cassell (cassell@mail.cor.epa.gov) wrote on MMCXXI September
MCMXCIII in <URL:news:376FD080.23D9A231@mail.cor.epa.gov>:
:: Abigail wrote: 
:: > But sometimes, it's as exotic as /net/crown/froot6/ABNA/perl/bin/perl.
:: 
:: That may sound like a joke,

Well, I was guessing, but:

$ /net/crown/froot6/SL441/Perl/bin/perl -v

This is perl, version 5.004_04, built for sun4-solaris




Abigail
-- 
Abigails don't joke.


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


------------------------------

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 6103
**************************************

home help back first fref pref prev next nref lref last post