[27973] in Perl-Users-Digest
Perl-Users Digest, Issue: 9337 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jun 21 21:05:47 2006
Date: Wed, 21 Jun 2006 18:05:04 -0700 (PDT)
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, 21 Jun 2006 Volume: 10 Number: 9337
Today's topics:
Re: Binding array to pattern <tadmc@augustmail.com>
Re: Binding array to pattern (Seymour J.)
Re: Binding array to pattern <benmorrow@tiscali.co.uk>
Re: how to replace this like <img width=100 ...> with < <tadmc@augustmail.com>
Re: List context versus list context <christoph.lamprecht.no.spam@web.de>
Re: List context versus list context <tadmc@augustmail.com>
Re: List context versus list context xhoster@gmail.com
Re: multiple system calls running at the same time <tadmc@augustmail.com>
Re: Reading the first .jpg file from a .rar archive? <ksheka@gmail.com>
Re: two servers listening on same port ? <No_4@dsl.pipex.com>
Re: use of uninitialized value (beginner) <tadmc@augustmail.com>
Re: What is Expressiveness in a Computer Language <david.nospam.hopwood@blueyonder.co.uk>
Re: What is Expressiveness in a Computer Language <gneuner2/@comcast.net>
Re: What's ^$ mean? smarkham01@yahoo.com
Re: What's ^$ mean? <David.Squire@no.spam.from.here.au>
Re: What's ^$ mean? usenet@DavidFilmer.com
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 21 Jun 2006 16:59:16 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Binding array to pattern
Message-Id: <slrne9jg9k.uog.tadmc@magna.augustmail.com>
Shmuel (Seymour J.) Metz <spamtrap@library.lspace.org.invalid> wrote:
> In <slrne96asq.7n8.tadmc@magna.augustmail.com>, on 06/16/2006
> at 05:07 PM, Tad McClellan <tadmc@augustmail.com> said:
>
>>Using grep() in this situation *simplifies* the logic (and avoids the
>>potential bug).
>
> Actually, both my code and yours have the same bug, pointed out by Mr.
> Morrow.
What bug was that?
The bug of matching across element boundaries?
That is the only bug that I could see in Ben's post.
He used my code, and said that one of the reasons that it is
better than what you were doing was that it does NOT contain
that bug. Go read what he said again.
And it is the same bug that I had already pointed out anyway.
I provided code showing the bug in your approach, so you could believe me.
Please post code that shows a bug in my approach, so I can believe you.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 21 Jun 2006 09:46:46 -0300
From: "Shmuel (Seymour J.) Metz" <spamtrap@library.lspace.org.invalid>
Subject: Re: Binding array to pattern
Message-Id: <44994dc6$1$fuzhry+tra$mr2ice@news.patriot.net>
In <3abbm3-11e.ln1@osiris.mauzo.dyndns.org>, on 06/16/2006
at 07:53 PM, Ben Morrow <benmorrow@tiscali.co.uk> said:
>These three lines are equivalent to
> push @abuseContacts, @{$email_contact}
> if grep /abuse/, $_, @{$email_contact};
Doesn't that have the problme you mention below?
>You do realise this will push *all* of @{$email_contact} onto
>@abuseContact, if *any* of them match?
Whoops! Thanks.
Perhaps
my $email_contact = $email_info->{$_} ;
push @Contacts, @$email_contact;
if (/abuse/) {
push @abuseContacts, @$email_contact;
} elsif (my @abuseSubset=grep /abuse/, @$email_contact) {
push @abuseContacts, @abuseSubset;
}
>By 'abuse contacts' you mean 'email addresses matching /abuse/',
>right?
I mean contacts designated for reporting abuse; looking for the string
"abuse" is just the best heuristic I could come up with.
>[Side issue: are you sure you mean /abuse/ and not /^abuse\@/ ?]
Very :-(
>...so you can read the tags and find the correct addr by hand?
Yes.
>Do you want the whole whois reply, or just all the email addesses in
>the reply?
The snippet of code in question is producing summary data; elsewhere I
do write out the full whois records.
>Or have I misunderstood you?
There are some complications that you aren't aware of. There are cases
in my whois processing where I must recursively invoke whois;
$host_info{$host}{Email} may include contacts from multiple whois
records.
>Err... not for a while :). Perl5 will be the supported and developed
>version of Perl for the forseeable future. Some features of Perl6
>are available for Perl5 in the modules in the Perl6::* namespace;
>any() is in Perl6::Junction (or, as Uri said, in
>Quantum::Superpositions, though that's likely much slower); also in
>List::MoreUtils, which is probably what I'd use if I needed it.
I expect others to be using this program; I don't want to include
obsolete copies of code from CPAN, but I also don't want to require
them to download additional modules. So far I've been sticking with
modules that are included in the OS/2 distribution. Would it be better
form to not use additional modules, to use them and document a
download as part of the installation process or to supply potentially
obsolete copies with my program?
--
Shmuel (Seymour J.) Metz, SysProg and JOAT <http://patriot.net/~shmuel>
Unsolicited bulk E-mail subject to legal action. I reserve the
right to publicly post or ridicule any abusive E-mail. Reply to
domain Patriot dot net user shmuel+news to contact me. Do not
reply to spamtrap@library.lspace.org
------------------------------
Date: Thu, 22 Jun 2006 01:36:07 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Binding array to pattern
Message-Id: <n85pm3-an5.ln1@osiris.mauzo.dyndns.org>
Quoth "Shmuel (Seymour J.) Metz" <spamtrap@library.lspace.org.invalid>:
> In <3abbm3-11e.ln1@osiris.mauzo.dyndns.org>, on 06/16/2006
> at 07:53 PM, Ben Morrow <benmorrow@tiscali.co.uk> said:
>
> >These three lines are equivalent to
> > push @abuseContacts, @{$email_contact}
> > if grep /abuse/, $_, @{$email_contact};
>
> Doesn't that have the problme you mention below?
Yes it does. Since I wasn't sure of what you wanted the code to do, I
left it doing the same as before.
> >You do realise this will push *all* of @{$email_contact} onto
> >@abuseContact, if *any* of them match?
>
> Whoops! Thanks.
>
> Perhaps
>
> my $email_contact = $email_info->{$_} ;
> push @Contacts, @$email_contact;
> if (/abuse/) {
> push @abuseContacts, @$email_contact;
> } elsif (my @abuseSubset=grep /abuse/, @$email_contact) {
> push @abuseContacts, @abuseSubset;
> }
Given that @abuseSubset will be empty if there are no matches, I'd just
have
else {
push @abuseContacts, grep /abuse/, @$email_contact;
}
instead of that elsif.
> >Err... not for a while :). Perl5 will be the supported and developed
> >version of Perl for the forseeable future. Some features of Perl6
> >are available for Perl5 in the modules in the Perl6::* namespace;
> >any() is in Perl6::Junction (or, as Uri said, in
> >Quantum::Superpositions, though that's likely much slower); also in
> >List::MoreUtils, which is probably what I'd use if I needed it.
>
> I expect others to be using this program; I don't want to include
> obsolete copies of code from CPAN, but I also don't want to require
> them to download additional modules. So far I've been sticking with
> modules that are included in the OS/2 distribution. Would it be better
> form to not use additional modules, to use them and document a
> download as part of the installation process or to supply potentially
> obsolete copies with my program?
Well....... that's a tricky one. My instinct would be to put the whole
thing in a module, with little script installed as part of the module
installation, and then put it on CPAN with a proper dependancy list.
Then your instructions are of the form of 'install Net::WhoisAbuse from
CPAN' or whatever. Spamassassain is a good example of something that
works like this.
If for whatever reason (proprietary code, expected level of user not
familiar with CPAN...) you don't want to do this, then you can't really
tell the user to install stuff off CPAN unless you can write an install
script to do it for them. As far as bundling the module with your script
goes, since you seem to be working for one platform only it would
probably be easiest for your users to make a .exe (OS/2 does call them
.exe, right?) using PAR, assuming that's been ported to OS/2. Then they
don't need perl or anything.
If that's not possible, then I would still not give up on CPAN: it's the
whole point of writing Perl :). At the very least, you can gut a module
and put it in your own script:
use Foo::Bar qw/whatever/;
is equivalent to
BEGIN {
$INC{'Foo/Bar.pm'} = $0;
{
# contents of Foo/Bar.pm here
}
import Foo::Bar qw/whatever/;
}
as long as the module doesn't use XS, and as long as you don't declare
any my variables before that.
In this *particular* case, I don't think any() is worth the effort :).
Ben
--
You poor take courage, you rich take care:
The Earth was made a common treasury for everyone to share
All things in common, all people one. [benmorrow@tiscali.co.uk]
'We come in peace'---the order came to cut them down.
------------------------------
Date: Wed, 21 Jun 2006 18:16:55 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: how to replace this like <img width=100 ...> with <img width="100" ...>
Message-Id: <slrne9jkr7.uvg.tadmc@magna.augustmail.com>
Pinocchio <krakle@visto.com> wrote:
> Tad McClellan wrote:
>> zhanye815@gmail.com <zhanye815@gmail.com> wrote:
>> > i want to write a script to convert the html to xhtml,so i want to use
>> > the regular expression to solve some problem like <img width=100
>> > height=100...> converting into <img width="100" height="100"...>.how to
>> > do it?
>>
>>
>> I know how to do that.
>>
>> But it does not meet your requirement of using a regex so, never mind.
>>
>
> It isn't uncommon in the Computer Programming world to encounter people
> who aren't good in social situations...
That is true enough.
> Tad you are the prime example
> of this...
That's rich, considering the vileness of your demonstrated conduct
in this newsgroup's social situation.
> Very knowledgable guy but have no idea how to interact with
> others in social conversations... It's not that you are rude...
It is not that I am rude, it is that I am *teaching*.
I could have launched an explanation of why XY problems are bad,
or I could arrange for the OP to learn that for himself.
I understand human cognition enough to try the approach that is
most likely to stick, saving the OP from falling prey to it in
the future.
Besides, I fully expected the OP to come back asking for the
non-regex solution, so I'd have the opportunity to answer the
question then.
> It's
> just that you don't get out often so you are socially inexperienced..
You do not know me, so that will just make your nose get longer.
> Let's go out and have a few beers buds! :)
We are not your buds.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Thu, 22 Jun 2006 00:18:51 +0200
From: Ch Lamprecht <christoph.lamprecht.no.spam@web.de>
Subject: Re: List context versus list context
Message-Id: <e7cgkb$uq2$1@online.de>
Ch Lamprecht schrieb:
> Bo Lindbergh schrieb:
>
>> Consider this snippet:
>> {
>> sub foo {
>> print scalar(@_)," arguments\n";
>> }
>>
>> foo((17)[2,1]);
>
> this calls foo with two parameters
>
>> foo(my @foo=(17)[2,1]);
>
>
> this assigns a slice containing an emty list to @foo and calls foo()
> with that.
>
>
> try this, to see the difference:
> foo(my @foo=(17,3,6)[2,1]);
>
>> }
>>
>> When run by my perl 5.8.8, it produces these two lines of output:
>> 2 arguments
>> 0 arguments
>>
>> So there seems to be (at least) two kinds of list context,
>> one used for evaluating function arguments and another one used
>> for evaluating the rhs of an assignment. I can't find any mention
>> of this in perldata.pod. What's up?
>>
>>
>> /Bo Lindbergh
>
>
> Christoph
sorry, I missed your point ;(
Christoph
--
perl -e "print scalar reverse q/ed.enilno@ergn.l.hc/"
------------------------------
Date: Wed, 21 Jun 2006 17:57:02 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: List context versus list context
Message-Id: <slrne9jjlu.uvg.tadmc@magna.augustmail.com>
Bo Lindbergh <blgl@stacken.kth.se> wrote:
> Consider this snippet:
> {
> sub foo {
> print scalar(@_)," arguments\n";
> }
>
> foo((17)[2,1]);
> foo(my @foo=(17)[2,1]);
> }
>
> When run by my perl 5.8.8, it produces these two lines of output:
> 2 arguments
> 0 arguments
> So there seems to be (at least) two kinds of list context,
> one used for evaluating function arguments and another one used
> for evaluating the rhs of an assignment.
It isn't really a context issue. It is a slice issue.
Slices are special-cased for list assignment.
> I can't find any mention
> of this in perldata.pod.
@c = (0,1)[2,3]; # @c has no elements
...
This makes it easy to write loops that terminate when a null list
is returned
...
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 22 Jun 2006 00:55:19 GMT
From: xhoster@gmail.com
Subject: Re: List context versus list context
Message-Id: <20060621205610.892$NH@newsreader.com>
Tad McClellan <tadmc@augustmail.com> wrote:
> Bo Lindbergh <blgl@stacken.kth.se> wrote:
> > Consider this snippet:
> > {
> > sub foo {
> > print scalar(@_)," arguments\n";
> > }
> >
> > foo((17)[2,1]);
> > foo(my @foo=(17)[2,1]);
> > }
> >
> > When run by my perl 5.8.8, it produces these two lines of output:
> > 2 arguments
> > 0 arguments
>
> > So there seems to be (at least) two kinds of list context,
> > one used for evaluating function arguments and another one used
> > for evaluating the rhs of an assignment.
>
> It isn't really a context issue. It is a slice issue.
>
> Slices are special-cased for list assignment.
>
> > I can't find any mention
> > of this in perldata.pod.
>
> @c = (0,1)[2,3]; # @c has no elements
> ...
> This makes it easy to write loops that terminate when a null list
> is returned
> ...
I don't quite get the documentation. It says:
A slice of an empty list is still an empty list. Thus:
@a = ()[1,0]; # @a has no elements
@b = (@a)[0,1]; # @b has no elements
@c = (0,1)[2,3]; # @c has no elements
But the third example is not the slice of an empty list! So while
an example is provided, that example doesn't match the description it
is supposedly an example of.
It seems that this would be more accurate:
A slice of an empty list is still an empty list. Thus:
@a = ()[1,0]; # @a has no elements
@b = (@a)[0,1]; # @b has no elements
Also, a slice completely after the end of a non-empty list is
an empty list. Thus:
@c = (0,1)[2,3]; # @c has no elements
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Wed, 21 Jun 2006 18:19:22 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: multiple system calls running at the same time
Message-Id: <slrne9jkvq.uvg.tadmc@magna.augustmail.com>
guser@packetstorm.org <guser@packetstorm.org> wrote:
> each call to the external program must finish
> before control is returned to the scheduler program.
> running
> multiple programs at once.
> If this is possible, would someone post an example or direct me to
> where I can read up on this?
Your Question is Asked Frequently:
perldoc -q background
How do I start a process in the background?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 21 Jun 2006 16:34:48 -0700
From: "K P S" <ksheka@gmail.com>
Subject: Re: Reading the first .jpg file from a .rar archive?
Message-Id: <1150932888.347416.261480@m73g2000cwd.googlegroups.com>
lawrence@hummer.not-here.net wrote:
> "DJ Stunks" <DJStunks@gmail.com> writes:
> > K P S wrote:
> > > Can someone please point me to a small script to read the first .jpg
> > > file from a .rar archive? I would like to create thumbnails of an
> > > archive based on the first image file in the archive.
> >
> > define "first"
>
> 1. The ordinal number matching the number one in a series.
> 2. The one coming, occurring, or ranking before or above all others.
>
> While I've never heard of a 'rar' archive, I'm guessing that like most
> archive formats, it has a list of files in the header/trailer -- so
> the 'first' would be that filename that matches .jpg$ before any
> other.
Rar is a file compression format similar to zip. The wikipedia entry
is: http://en.wikipedia.org/wiki/RAR_%28file_format%29
The perl module is found here:
http://search.cpan.org/~jmbo/Archive-Rar-1.9/Rar.pm
I unfortunately don't know much about perl to begin with, but I'm
taking a stab at this: I want a small application that will take two
arguements, the first a .rar file, and the second a file name. It will
extract the first .jpg file from the archive, convert it to .png
format, and save it as the file name in the second arguement.
The reason is to create thumbnails of .rar files based on their
contents, in nautilus.
------------------------------
Date: Thu, 22 Jun 2006 01:17:24 +0100
From: Big and Blue <No_4@dsl.pipex.com>
Subject: Re: two servers listening on same port ?
Message-Id: <baidnT7RbN8JfATZnZ2dnUVZ8t2dnZ2d@pipex.net>
Ben Morrow wrote:
>
> To the OP: remove the SO_REUSEADDR. Winsock is *COMPLETELY* broken;
I think you've missed the point - Microsoft *is* the standard (the MS
definition of a standard is "used by MS"). It's everything else which is
wrong. The fact that MS is completely broken here doesn't matter....
--
Just because I've written it doesn't mean that
either you or I have to believe it.
------------------------------
Date: Wed, 21 Jun 2006 17:36:49 -0500
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: use of uninitialized value (beginner)
Message-Id: <slrne9jig1.uvg.tadmc@magna.augustmail.com>
Marek Stepanek <mstep@t-online.de> wrote:
> My script is now like follows, if you have suggestions on style, or say
> better basics, - I am unfortunately not yet there, what you call "style" -
> please go ahead :-)
> s/,/./g;
tr/,/./; # does the same thing, only more clearly and faster too
> push @lines, $_ if (/^[\d.\t\s]+$/ || /^$/);
A tab will match \s, so you don't need the \t
If you make all of the characters optional, then you can
eliminate the 2nd or clause.
I prefer not to clutter things up with parenthesis that are
not needed.
So we end up with this replacement line:
push @lines, $_ if /^[\d.\s]*$/;
> add_one_day($year, $month, $day);
You never do anything with the return values from that subroutine.
> sub add_one_day
> {
> $month2 = sprintf("%02d", $month2);
> $day2 = sprintf("%02d", $day2);
> $date = "$day2.$month2.$year2";
You can do the formatting all at once with one line:
$date = sprintf '%02d.%02d.%4d', $day2, $month2, $year2;
> ($day, $month, $year) = ($day2, $month2, $year2);
Why manipulate copies rather than the originals?
> return ($wochentag, $date, $year, $month, $day);
Your code never looks at the values you are returning here.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 21 Jun 2006 23:01:36 GMT
From: David Hopwood <david.nospam.hopwood@blueyonder.co.uk>
Subject: Re: What is Expressiveness in a Computer Language
Message-Id: <kdkmg.449540$tc.40481@fe2.news.blueyonder.co.uk>
Marshall wrote:
> Chris Smith wrote:
>>Marshall <marshall.spight@gmail.com> wrote:
>>
>>>I think what this highlights is the fact that our existing terminology
>>>is not up to the task of representing all the possible design
>>>choices we could make. Some parts of dynamic vs. static
>>>a mutually exclusive; some parts are orthogonal.
>>
>>Really? I can see that in a strong enough static type system, many
>>dynamic typing features would become unobservable and therefore would be
>>pragmatically excluded from any probable implementations... but I don't
>>see any other kind of mutual exclusion between the two.
>
> Well, it strikes me that some of what the dynamic camp likes
> is the actual *absence* of declared types, or the necessity
> of having them.
So why aren't they happy with something like, say, Alice ML, which is
statically typed, but has a "dynamic" type and type inference? I mean
this as a serious question.
> At the very least, requiring types vs. not requiring
> types is mutually exclusive.
Right, but it's pretty well established that languages that don't
require type *declarations* can still be statically typed.
--
David Hopwood <david.nospam.hopwood@blueyonder.co.uk>
------------------------------
Date: Wed, 21 Jun 2006 19:22:49 -0400
From: George Neuner <gneuner2/@comcast.net>
Subject: Re: What is Expressiveness in a Computer Language
Message-Id: <7pij925jg29ddfvfrn0b98crrkfm4daaef@4ax.com>
On 21 Jun 2006 15:04:23 -0700, "Greg Buchholz"
<sleepingsquirrel@yahoo.com> wrote:
> I haven't been following this thread too closely, but I thought the
>following article might be of interest...
>
>Eliminating Array Bound Checking through Non-dependent types.
>http://okmij.org/ftp/Haskell/types.html#branding
That was interesting, but the authors' method still involves runtime
checking of the array bounds. IMO, all they really succeeded in doing
was turning the original recursion into CPS and making the code a
little bit clearer.
George
--
for email reply remove "/" from address
------------------------------
Date: 21 Jun 2006 16:42:31 -0700
From: smarkham01@yahoo.com
Subject: Re: What's ^$ mean?
Message-Id: <1150933351.197778.143500@i40g2000cwc.googlegroups.com>
Thank you Tadd, I've read your guidlines, many times in fact. Notice
that I never post in your moderated group?
You seem to be back to over-thinking the question. The question didn't
have anything to do with character classes or an XOR! Just two
charactors ^ followed by $.
Sorry life doesn't always flow in the vein you chose.
Please learn the difference between moderator in a moderated group and
ass in a new group before responding.
>
> > I don't disagree with your definition Tadd,
>
>
> s/Tadd/Tad/;
>
>
> > but I'm curious as to what
> > meaning, other than "at the beginning of the (string | line) match the
> > end of (string | line)" "^$" might have? Don't meta-characters remain
> > remain meta-characters where ever they are,
>
>
> No, they don't.
>
> What the syntax means depends on what language the characters are in.
>
> If you had instead said:
>
> Is /^$/ mean a NULL line?
>
> Then we would have known that the language the metacharacters appear
> in is the regex language. (regex language)
>
> But if you had said:
>
> Is [^$] mean a NULL line?
>
> Then the answer would have been: No, it matches any single character
> that is not a dollar sign. (character class language)
>
> And if you had said:
>
> Is $vector^$mask mean a NULL line?
>
> Then the answer would have been: No, it is a bitwise exclusive-or
> and the sigil of a variable. (Perl language)
>
> Taking just the caret (^) character, it has 3 meanings in 3
> different languages:
>
> Perl: bitwise exclusive-or
>
> regex: beginning of string
>
> char class: negates the class
>
>
> Apart from that, even in the *same* language the same character
> can have different meta-meanings. Take curly braces in Perl for
> example: part of a hash slice, code block, anonymous hash
> constructor, variable name delimiter, part of a hash access...
>
> So, we cannot talk about Perl symbols without knowing a bit about
> the context where the symbols appear, hence the encouragement to
> post Real Perl Code in the Posting Guidelines.
>
> Have you seen the Posting Guidelines that are posted here frequently?
>
>
> --
> Tad McClellan SGML consulting
> tadmc@augustmail.com Perl programming
> Fort Worth, Texas
------------------------------
Date: Thu, 22 Jun 2006 00:52:14 +0100
From: David Squire <David.Squire@no.spam.from.here.au>
Subject: Re: What's ^$ mean?
Message-Id: <e7cm3e$d4a$1@news.ox.ac.uk>
smarkham01@yahoo.com wrote:
> Thank you Tadd, I've read your guidlines, many times in fact. Notice
> that I never post in your moderated group?
>
> You seem to be back to over-thinking the question. The question didn't
> have anything to do with character classes or an XOR! Just two
> charactors ^ followed by $.
>
... but as Tad explained in detail, the question as posed was
unanswerable. Those two characters mean different things in different
contexts. The question gave no information on the context. Tad explained
the various meanings in several contexts.
What exactly do you find unhelpful about that?
DS
------------------------------
Date: 21 Jun 2006 17:11:59 -0700
From: usenet@DavidFilmer.com
Subject: Re: What's ^$ mean?
Message-Id: <1150935119.328153.274340@i40g2000cwc.googlegroups.com>
smarkham01@yahoo.com wrote:
> Please learn the difference between moderator in a moderated group and
> ass in a new group before responding.
Wow. New to the group and ALREADY you've insulted (without a bit of
merit) a longtime respected contributor who was trying to be helpful to
you. Do you always find ways to insult helpful people whom you've just
met?
Now, lessee - where's that killfile button? Grrrrrr... darn Google
Groups. Time to hammer on the firewall guys again...
--
David Filmer (http://DavidFilmer.com)
------------------------------
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 9337
***************************************
