[27356] in Perl-Users-Digest
Perl-Users Digest, Issue: 9057 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Mar 16 00:05:40 2006
Date: Wed, 15 Mar 2006 21:05:05 -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 Wed, 15 Mar 2006 Volume: 10 Number: 9057
Today's topics:
Re: Can I skip tokens in RegExp backreferences? robic0
Re: Can I skip tokens in RegExp backreferences? robic0
Re: Can I skip tokens in RegExp backreferences? robic0
Re: Can I skip tokens in RegExp backreferences? <matthew.garrish@sympatico.ca>
Re: Can I skip tokens in RegExp backreferences? robic0
Re: Can I skip tokens in RegExp backreferences? robic0
Determine read/write status of filehandles connected to <sisyphus1@nomail.afraid.org>
Re: FAQ 3.9 Is there a ctags for Perl? robic0
Re: FAQ 3.9 Is there a ctags for Perl? <uri@stemsystems.com>
Re: Using a variable to call a sub-routine... <tadmc@augustmail.com>
Re: Using a variable to call a sub-routine... robic0
Re: Using a variable to call a sub-routine... robic0
Re: Using a variable to call a sub-routine... <uri@stemsystems.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 15 Mar 2006 18:21:06 -0800
From: robic0
Subject: Re: Can I skip tokens in RegExp backreferences?
Message-Id: <tkih12l2gusv0dfoh4g6v74350basg275a@4ax.com>
On Wed, 15 Mar 2006 18:17:25 -0500, "Matt Garrish" <matthew.garrish@sympatico.ca> wrote:
>
><robic0> wrote in message news:960f1218rhde9h9gus6d1s3d7n8tj5io4u@4ax.com...
>> On Wed, 15 Mar 2006 01:12:40 GMT, Someone Else
>> <invalid@earthlink.net.invalid> wrote:
>>
>>>What I want to do is to use a regular expression like:
>>>
>>> /([+-]\s*\d+)/;
>>>
>>>to parse some fairly complicated algebraic expressions; but I
>>>don't want to capture the \s* as part of $1. In other words, I
>>>would like either "+ 32" or "+32" to store "+32" in $1. (I've
>>>extracted the salient feature. The real problem is much more
>>>complicated, but the details are essentially irrelevant to my
>>>question. See below if you're interested.)
>>>
>>>What I am looking for is something like:
>>>
>>> /([+-](?:\s*)\d+)/;
>>>
>>>but not quite. Not only don't I want to capture the \s* in $2,
>>>but I want to exclude it from the enclosing $1.
>>>
>>>Any ideas?
>>>
>>>Semi-irrelevant details follow:
>>>
>>>In the simple example above it's easy to ignore $2. The real
>>>application is more like:
>>>
>>> @a = /\s*([+-]\s*\d+)/g;
>>>
>>>In that case it's still easy to use:
>>>
>>> @a = /\s*([+-])\s*(\d+)/g;
>>>
>>>and then concatenate every pair of entries in @a. But as I said,
>>>the real application is much more complicated. It involves
>>>parsing 40 MB files written in an arcane linear programming
>>>language, with floating-point coefficients, variable names that
>>>can include nearly any printable character, extending over many
>>>lines, interspersed with relational symbols, etc.. So I'd really
>>>like to avoid a lot of pre- or post-processing.
>>>
>>
>> if ($var ~= s/([+-]*?)\s*?(\d+?)/$1$2/) {
>
>What is \s*? to you? And the difference between it and \s* in this context
>is?
>
>The point of a non-greedy modifier is to limit how far the match will
>extend. In this case, you have three *distinct patterns* involved, none of
>which overlap or would be affected by adding the non-greedy "*?". The [+-]
>character class will stop matching when it hits anything that is not one of
>those two characters, and \s and \d are not. Likewise, the \s whitespace
>will stop matching when it hits anything that is not whitespace. And the
>last \d+? does what, as it's not anchored to anything?
>
>Try and follow:
>
>my $num = ' 1234';
>
>If you wanted to write a regex that grabs the group of numbers, but excludes
>4 if it's at the end (as it is above), you wouldn't write:
>
>$num =~ s/^\s*(\d+)4?$/$1/g;
>
>because the \d+ will grab the four, as it's optional outside the capture.
>Instead you'd write:
>
>$num =~ s/^\s*(\d+?)4?$/$1/g;
>
>In this case, \d+? will not capture the four, even though the four is a
>digit, because you just made it non-greedy (i.e., you allow what follows the
>capture to match).
>
>Please take the time to learn about what you profess to know before making
>us all painfully aware yet again that you don't.
>
>> print "found: $var\n";
>> else {
>> print "no match found: $var\n";
>> }
>>
>> But you bettern need to know what text you will be dealing with.
>> To include \s*, zero or more white spaces, indicates that you
>> can't guarantee the [+-] character class nor the numbers.
>
>Does that mean something in English, or just in your head?
>
>Matt
>
You don't know what you are talking about. I lay out my regex for a reason!
Unfortunately, regex doesen't follow the rules itself states! Backtracing is
a joke in complex regex. The "greed" is a pandemic that is variable.
For that reason I always state the structured method... my method!
I don't wait for "shit to happen"! I avoid it at all costs man!
Expressions like this:
$RxParse =
qr/(?:<(?:(?:(\/*)($Name)\s*(\/*))|(?:META(.*?))|(?:($Name)((?:\s+$Name\s*=\s*["'][^<]*['"])+)\s*(\/*))|(?:\?(.*?)\?)|(?:!(?:(?:DOCTYPE(.*?))|(?:\[CDATA\[(.*?)\]\])|(?:--(.*?[^-])--)|(?:ATTLIST(.*?))|(?:ENTITY(.*?)))))>)|(.+?)/s;
# ( <( ( 1 12 2 3 3)|( 4 4)|( 5 56( ) 6 7 7)|( 8 8 )|( !( ( 9 9)|( 0 0 )|( 1 1 )|(
2 2)|( 3 3))))>)|4 4
don't just come out of thin air !!!
Rob
------------------------------
Date: Wed, 15 Mar 2006 18:28:29 -0800
From: robic0
Subject: Re: Can I skip tokens in RegExp backreferences?
Message-Id: <46jh12hqbetv1ve38j32glsei6hqbuej9u@4ax.com>
-<snip>-
>Yes, there are several perfectly servicable workarounds. I was
>just wondering whether it could be done directly. It would be a
>lot cleaner (in the context of the larger parsing problem) if
>there were a way.
-<snip>-
A direct way would be to look past your navel and contribute to the
solution, instead of "directly" asking for one...
------------------------------
Date: Wed, 15 Mar 2006 18:34:53 -0800
From: robic0
Subject: Re: Can I skip tokens in RegExp backreferences?
Message-Id: <qcjh12p2u02nbbdvgbul1vfsjas2p2i015@4ax.com>
-<snip>-
>I'm already using the simple solution (and it runs just fine),
Several indents in and you are defending yourself!
>but it's ugly when mixed into the larger parsing problem. It's
Nobody can cure "ugly", its a byproduct of not know what the fuck to do.
>mostly just an issue I never ran into before, although it looks
>like a natural thing to want to do. I couldn't find a clean way
take the bullshit dirty way! Are u absolutely sure a "clean" way
will make a difference?
>to handle it, so I thought I'd ask.
>
-<snip>-
One liners result in probably a "higher" cpu overhead than
"logic liners". I'm willing to bet the farm on that...
------------------------------
Date: Wed, 15 Mar 2006 21:27:12 -0500
From: "Matt Garrish" <matthew.garrish@sympatico.ca>
Subject: Re: Can I skip tokens in RegExp backreferences?
Message-Id: <W14Sf.3680$fy1.216280@news20.bellglobal.com>
<robic0> wrote in message news:tkih12l2gusv0dfoh4g6v74350basg275a@4ax.com...
> On Wed, 15 Mar 2006 18:17:25 -0500, "Matt Garrish"
> <matthew.garrish@sympatico.ca> wrote:
>
>>
>>Try and follow:
>>
>>my $num = ' 1234';
>>
>>If you wanted to write a regex that grabs the group of numbers, but
>>excludes
>>4 if it's at the end (as it is above), you wouldn't write:
>>
>>$num =~ s/^\s*(\d+)4?$/$1/g;
>>
>>because the \d+ will grab the four, as it's optional outside the capture.
>>Instead you'd write:
>>
>>$num =~ s/^\s*(\d+?)4?$/$1/g;
>>
>>In this case, \d+? will not capture the four, even though the four is a
>>digit, because you just made it non-greedy (i.e., you allow what follows
>>the
>>capture to match).
>>
>>Please take the time to learn about what you profess to know before making
>>us all painfully aware yet again that you don't.
>>
>>> print "found: $var\n";
>>> else {
>>> print "no match found: $var\n";
>>> }
>>>
>>> But you bettern need to know what text you will be dealing with.
>>> To include \s*, zero or more white spaces, indicates that you
>>> can't guarantee the [+-] character class nor the numbers.
>>
>>Does that mean something in English, or just in your head?
>>
>
> You don't know what you are talking about. I lay out my regex for a
> reason!
> Unfortunately, regex doesen't follow the rules itself states! Backtracing
> is
> a joke in complex regex. The "greed" is a pandemic that is variable.
> For that reason I always state the structured method... my method!
> I don't wait for "shit to happen"!
Yes, I've noticed that shit comes out of you at the jibberish stage. All of
what you wrote above can be condensed to one line: "robic0 does not know
what he is talking about".
Matt
------------------------------
Date: Wed, 15 Mar 2006 18:47:09 -0800
From: robic0
Subject: Re: Can I skip tokens in RegExp backreferences?
Message-Id: <99kh125a4gpo9jd8qji39dkr6ntpl8fsuj@4ax.com>
On Wed, 15 Mar 2006 21:27:12 -0500, "Matt Garrish" <matthew.garrish@sympatico.ca> wrote:
>
><robic0> wrote in message news:tkih12l2gusv0dfoh4g6v74350basg275a@4ax.com...
>> On Wed, 15 Mar 2006 18:17:25 -0500, "Matt Garrish"
>> <matthew.garrish@sympatico.ca> wrote:
>>
>>>
>>>Try and follow:
>>>
>>>my $num = ' 1234';
>>>
>>>If you wanted to write a regex that grabs the group of numbers, but
>>>excludes
>>>4 if it's at the end (as it is above), you wouldn't write:
>>>
>>>$num =~ s/^\s*(\d+)4?$/$1/g;
>>>
>>>because the \d+ will grab the four, as it's optional outside the capture.
>>>Instead you'd write:
>>>
>>>$num =~ s/^\s*(\d+?)4?$/$1/g;
>>>
>>>In this case, \d+? will not capture the four, even though the four is a
>>>digit, because you just made it non-greedy (i.e., you allow what follows
>>>the
>>>capture to match).
>>>
>>>Please take the time to learn about what you profess to know before making
>>>us all painfully aware yet again that you don't.
>>>
>>>> print "found: $var\n";
>>>> else {
>>>> print "no match found: $var\n";
>>>> }
>>>>
>>>> But you bettern need to know what text you will be dealing with.
>>>> To include \s*, zero or more white spaces, indicates that you
>>>> can't guarantee the [+-] character class nor the numbers.
>>>
>>>Does that mean something in English, or just in your head?
>>>
>>
>> You don't know what you are talking about. I lay out my regex for a
>> reason!
>> Unfortunately, regex doesen't follow the rules itself states! Backtracing
>> is
>> a joke in complex regex. The "greed" is a pandemic that is variable.
>> For that reason I always state the structured method... my method!
>> I don't wait for "shit to happen"!
>
>Yes, I've noticed that shit comes out of you at the jibberish stage. All of
>what you wrote above can be condensed to one line: "robic0 does not know
>what he is talking about".
>
>Matt
>
my comment:
$var = "what the fuck";
>what you wrote above can be condensed to one line: "robic0 does not know
>what $var he is talking about".
Say it Matt, say it outloud. Say it because your sould depends on it.
I'm not here for me, I'm here for uuuuuuuuuuuuu ..........
------------------------------
Date: Wed, 15 Mar 2006 19:07:39 -0800
From: robic0
Subject: Re: Can I skip tokens in RegExp backreferences?
Message-Id: <2blh125ts475i1klehcauciene815v0g5b@4ax.com>
On Wed, 15 Mar 2006 21:27:12 -0500, "Matt Garrish" <matthew.garrish@sympatico.ca> wrote:
>
><robic0> wrote in message news:tkih12l2gusv0dfoh4g6v74350basg275a@4ax.com...
>> On Wed, 15 Mar 2006 18:17:25 -0500, "Matt Garrish"
>> <matthew.garrish@sympatico.ca> wrote:
>>
>>>
>>>Try and follow:
>>>
>>>my $num = ' 1234';
>>>
>>>If you wanted to write a regex that grabs the group of numbers, but
>>>excludes
>>>4 if it's at the end (as it is above), you wouldn't write:
>>>
>>>$num =~ s/^\s*(\d+)4?$/$1/g;
>>>
>>>because the \d+ will grab the four, as it's optional outside the capture.
>>>Instead you'd write:
>>>
>>>$num =~ s/^\s*(\d+?)4?$/$1/g;
>>>
>>>In this case, \d+? will not capture the four, even though the four is a
>>>digit, because you just made it non-greedy (i.e., you allow what follows
>>>the
>>>capture to match).
>>>
>>>Please take the time to learn about what you profess to know before making
>>>us all painfully aware yet again that you don't.
>>>
>>>> print "found: $var\n";
>>>> else {
>>>> print "no match found: $var\n";
>>>> }
>>>>
>>>> But you bettern need to know what text you will be dealing with.
>>>> To include \s*, zero or more white spaces, indicates that you
>>>> can't guarantee the [+-] character class nor the numbers.
>>>
>>>Does that mean something in English, or just in your head?
>>>
>>
>> You don't know what you are talking about. I lay out my regex for a
>> reason!
>> Unfortunately, regex doesen't follow the rules itself states! Backtracing
>> is
>> a joke in complex regex. The "greed" is a pandemic that is variable.
>> For that reason I always state the structured method... my method!
>> I don't wait for "shit to happen"!
>
>Yes, I've noticed that shit comes out of you at the jibberish stage. All of
>what you wrote above can be condensed to one line: "robic0 does not know
>what he is talking about".
>
>Matt
>
I wish no-one any harm with my posts. I only try to step sideways and
dellineate design conceptual errors. If I'm wrong in concept, feel free
to put me in my place. It might be hard, seeing as I'vd done more in
my life that 60 folks who come here (including regulars) have and will
ever do..
Robic0
------------------------------
Date: Thu, 16 Mar 2006 15:40:42 +1100
From: "Sisyphus" <sisyphus1@nomail.afraid.org>
Subject: Determine read/write status of filehandles connected to memory objects.
Message-Id: <4418ed02$0$7532$afc38c87@news.optusnet.com.au>
Hi,
On unix, with filehandles connected to normal files, we can query the
read/write status of the filehandle by examining the return value of the
fcntl() function:
use Fcntl;
# some code that creates the open $filehandle.
my $fmode = fcntl($filehandle, F_GETFL, my $slush = 0);
The value of $fmode will allow us to determine whether the filehandle is
readonly, writeonly, or readable/writable.
But with perl 5.8, it's possible to create filehandles connected to memory
objects:
use warnings;
use strict;
my ($fh1, $fh2, $var1, $var2);
open $fh1, '>', \$var1 or die $!;
print $fh1 "hello"; # $var1 contains "hello"
open $fh2, '<', \$var1 or die $!;
$var2 = <$fh2>; # $var2 contains "hello";
close $fh1 or die $!;
close $fh2 or die $!;
print $var1, " ", $var2, "\n"; # prints "hello hello"
__END__
But now the fcntl() function is unable to provide information that I can use
to determine the read/write status of $fh1and $fh2.
For both $fh1 and $fh2 the fcntl() function will return undef - and fileno()
will return -1.
The question:
How can I determine the read/write status of an open filehandle that's
connected to a memory object ?
Cheers,
Rob
------------------------------
Date: Wed, 15 Mar 2006 18:10:16 -0800
From: robic0
Subject: Re: FAQ 3.9 Is there a ctags for Perl?
Message-Id: <13ih12phj90lokrnsisdsb45hfk2ert3no@4ax.com>
On Wed, 15 Mar 2006 18:03:02 -0800, PerlFAQ Server <brian@stonehenge.com> wrote:
>This is an excerpt from the latest version perlfaq3.pod, which
>comes with the standard Perl distribution. These postings aim to
>reduce the number of repeated questions as well as allow the community
>to review and update the answers. The latest version of the complete
>perlfaq is at http://faq.perl.org .
>
>--------------------------------------------------------------------
>
>3.9: Is there a ctags for Perl?
>
> (contributed by brian d foy)
>
> Exuberent ctags supports Perl: http://ctags.sourceforge.net/
>
> You might also try pltags: http://www.mscha.com/pltags.zip
>
>
>
>--------------------------------------------------------------------
>
>The perlfaq-workers, a group of volunteers, maintain the perlfaq. They
>are not necessarily experts in every domain where Perl might show up,
>so please include as much information as possible and relevant in any
>corrections. The perlfaq-workers also don't have access to every operating
>system or platform, so please include relevant details for corrections
>to examples that do not work on particular platforms. Working code is
>greatly appreciated.
>
>If you'd like to help maintain the perlfaq, see the details in
>perlfaq.pod.
>*** Free account sponsored by SecureIX.com ***
>*** Encrypt your Internet usage with a free VPN account from http://www.SecureIX.com ***
I vaguely remember ctags, its a C thing aint it? Please refresh me on what a "ctag" is
because I may represent a million other readers of this piece of crap maintained faq
that think you post to only a few who already know what your taling about.
But then, "why the fuck post it huh?"
------------------------------
Date: Wed, 15 Mar 2006 23:34:22 -0500
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: FAQ 3.9 Is there a ctags for Perl?
Message-Id: <x7u09z2ek1.fsf@mail.sysarch.com>
>>>>> "r" == robic0 <robic0> writes:
r> I vaguely remember ctags, its a C thing aint it? Please refresh me
r> on what a "ctag" is because I may represent a million other readers
r> of this piece of crap maintained faq that think you post to only a
r> few who already know what your taling about.
r> But then, "why the fuck post it huh?"
because it is a small part of the vast worldwide perl cabal conspiracy
whose prime directive is to annoy the shit out of you!
and we must be succeeding since you get so pissed off when you don't
understand something.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Wed, 15 Mar 2006 20:15:09 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Using a variable to call a sub-routine...
Message-Id: <slrne1hihd.52v.tadmc@magna.augustmail.com>
Big Jay <jbredice@hotmail.com> wrote:
> I'm trying to call a sub-routine based on the value of a variable.
That is what is known as a "dispatch table".
You'll need to learn a bit about references to implement
a dispatch table in Perl.
(the word "subroutine" is not hyphenated.)
> More specifically, I'm developing a menu system, where each level of the
> menu has it's own sub-routine, but for a generalized "back" function, I'm
> trying to call the last menu based on a variable, something like:
>
> $lastMenu = apiMenu;
>
> &$lastMenu; #I want this to be the same as calling &apiMenu
-------------------
#!/usr/bin/perl
use warnings;
use strict;
my %menu_funcs = ( # a dispatch table
Open => \&open_file,
Edit => \&edit_file,
Close => \&close_file,
);
foreach my $menu_choice ( 'Open', 'Edit', 'Close' ) {
$menu_funcs{ $menu_choice }->(); # or: &{ $menu_funcs{ $menu_choice } }
}
sub open_file { warn "open_file() got called\n" }
sub edit_file { warn "edit_file() got called\n" }
sub close_file { warn "close_file() got called\n" }
-------------------
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 15 Mar 2006 18:42:15 -0800
From: robic0
Subject: Re: Using a variable to call a sub-routine...
Message-Id: <8rjh12lq9er13hp8e53sua8cfat4lnbfit@4ax.com>
On Wed, 15 Mar 2006 20:15:09 -0600, Tad McClellan <tadmc@augustmail.com> wrote:
>Big Jay <jbredice@hotmail.com> wrote:
>
>
>> I'm trying to call a sub-routine based on the value of a variable.
>
>
>That is what is known as a "dispatch table".
>
Maybe Tad, you can explain "dispatch table" a phrase used
exclusively for NT drivers...
Expanding out of Perl Tad?
>You'll need to learn a bit about references to implement
>a dispatch table in Perl.
>
You might even have to learn NT driver developer package...
>(the word "subroutine" is not hyphenated.)
>
>
>> More specifically, I'm developing a menu system, where each level of the
>> menu has it's own sub-routine, but for a generalized "back" function, I'm
>> trying to call the last menu based on a variable, something like:
Your developing a "menu system" in Perl? Hey Perl is *not* Windows!!!!!!!!!!!!!
Take a Windows developer class from me. Do you know at least C ?
>>
>> $lastMenu = apiMenu;
>>
>> &$lastMenu; #I want this to be the same as calling &apiMenu
>
>
>-------------------
>#!/usr/bin/perl
>use warnings;
>use strict;
>
>my %menu_funcs = ( # a dispatch table
> Open => \&open_file,
> Edit => \&edit_file,
> Close => \&close_file,
>);
>
>foreach my $menu_choice ( 'Open', 'Edit', 'Close' ) {
> $menu_funcs{ $menu_choice }->(); # or: &{ $menu_funcs{ $menu_choice } }
>}
>
>sub open_file { warn "open_file() got called\n" }
>sub edit_file { warn "edit_file() got called\n" }
>sub close_file { warn "close_file() got called\n" }
>-------------------
Sorry man, its all bullshit.
------------------------------
Date: Wed, 15 Mar 2006 18:56:32 -0800
From: robic0
Subject: Re: Using a variable to call a sub-routine...
Message-Id: <2ikh121716mog6vqrch7p50g8294ql3307@4ax.com>
On Wed, 15 Mar 2006 20:35:25 -0500, "Matt Garrish" <matthew.garrish@sympatico.ca> wrote:
>
>"Big Jay" <jbredice@hotmail.com> wrote in message
>news:dP1Sf.1513$tN3.1066@newssvr27.news.prodigy.net...
>> Hi all,
>>
>> I'm trying to call a sub-routine based on the value of a variable.
>>
>> More specifically, I'm developing a menu system, where each level of the
>> menu has it's own sub-routine, but for a generalized "back" function, I'm
>> trying to call the last menu based on a variable, something like:
>>
>> $lastMenu = apiMenu;
>>
>> &$lastMenu; #I want this to be the same as calling &apiMenu
>>
>> Does this make any sense?
>>
>
>They're called symrefs, and they're to be avoided. It's always better to use
>a hash:
>
Symrefs? Stand for Symbolic References?
Can you please explain, for the beginners, when you use such wild assed terms..
The FLAWWED_FAQ tries I know rescue beginners when it sees such phrases
(that seem to make sence).
However, gone are the days of intellecutal arragoance! If you think your
audience doesen't understand your logic or analogy, its up to *YOU* to
provide the full documentation in your words.
Buddy, who the fuck knows what your talking about? Don't invoke
Einstein's theory of realtivity with out explaining yourself!!
I'm gonna hold everyone to this, period !!
-<snip>-
------------------------------
Date: Wed, 15 Mar 2006 23:31:52 -0500
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Using a variable to call a sub-routine...
Message-Id: <x7y7zb2eo7.fsf@mail.sysarch.com>
>>>>> "r" == robic0 <robic0> writes:
r> On Wed, 15 Mar 2006 20:15:09 -0600, Tad McClellan <tadmc@augustmail.com> wrote:
>> That is what is known as a "dispatch table".
>>
r> Maybe Tad, you can explain "dispatch table" a phrase used
r> exclusively for NT drivers...
r> Expanding out of Perl Tad?
hmm, did your addlepated brain ever allow the possibility that the term
dispatch table is slightly older than nt? and the concept is even older
than that? you really think that redmond both invented the concept and
the term? i was coding dispatch tables way before uncle bill robbed his
first billion. but you won't understand this anymore than you know why
the sky is blue.
how do you function in the real world with such delusions and
miscomprehensions? but your alter ego rm will soon pop in. ever notice
how the two of you are never seen at the same time?
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
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:
#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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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.
#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 V10 Issue 9057
***************************************
