[19434] in Perl-Users-Digest
Perl-Users Digest, Issue: 1629 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 27 21:06:02 2001
Date: Mon, 27 Aug 2001 18:05:19 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <998960718-v10-i1629@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Mon, 27 Aug 2001 Volume: 10 Number: 1629
Today's topics:
A bit of expaination of caller() please (Stan Brown)
Re: Accessing $a and $b in conjunction with goto &NAME <ren@tivoli.com>
Re: anonymous code refs and 'sort' (Sean McAfee)
Benchmark <kclair@soya.serve.com>
Re: Benchmark <joe+usenet@sunstarsys.com>
Blessings with DBI fetchrow_hashref? <vze2r2j8@verizon.net>
Re: Blessings with DBI fetchrow_hashref? <bwalton@rochester.rr.com>
Re: Blessings with DBI fetchrow_hashref? <vze2r2j8@verizon.net>
Re: CGI redirect <guymal@__NOSPAM__hotmail.com>
Re: CODE reference to member function of package Confus (Yves Orton)
Re: dynamic menu (efficiency) four12and8up@unspam-me.yahoo.com
Re: First Program, Need Help <rsherman@ce.gatech.edu>
Re: First Program, Need Help <rom616@bellsouth.net>
Re: form post to https server, best method <bwalton@rochester.rr.com>
Re: fwd: Sex or perl? <spamsimonfarmer@yahoo.com>
Re: fwd: Sex or perl? <bs@bs-linux.com>
Re: fwd: Sex or perl? (John J. Trammell)
Re: fwd: Sex or perl? <bemsha@midsouthSPAM.rr.com>
Re: fwd: Sex or perl? <bs@bs-linux.com>
Re: fwd: Sex or perl? <bemsha@midsouthSPAM.rr.com>
Re: fwd: Sex or perl? <bs@bs-linux.com>
Re: fwd: Sex or perl? <bemsha@midsouthSPAM.rr.com>
Re: fwd: Sex or perl? <bs@bs-linux.com>
Re: Godzilla flame <tsee@gmx.net>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Aug 2001 15:30:16 -0400
From: stanb@panix.com (Stan Brown)
Subject: A bit of expaination of caller() please
Message-Id: <9me748$h8f$1@panix3.panix.com>
How can I use caller() to print out the current callstack? All of it thta
is?
------------------------------
Date: 27 Aug 2001 16:41:18 -0500
From: Ren Maddox <ren@tivoli.com>
Subject: Re: Accessing $a and $b in conjunction with goto &NAME
Message-Id: <m3ofp1tc3l.fsf@dhcp9-161.support.tivoli.com>
On 23 Aug 2001, anno4000@lublin.zrz.tu-berlin.de wrote:
> If it is an option, you could forgo the problem and define complete
> sorting function(s) (expecting and returning a list) in the module.
>
> Or don't use $a and $b in your code and require the user to do
>
> sort { ipsort( $a, $b) } @list;
>
> Since you are using split() in the comparison routine, the overhead
> shouldn't matter much, but it is an inconvenience for the user.
Or, just define your sort routine with a prototype of ($$) and sort
will pass $a and $b as arguments. Then your sort routine can just
operate on @_[0,1], or do a "my($a,$b)=@_;".
--
Ren Maddox
ren@tivoli.com
------------------------------
Date: 27 Aug 2001 11:56:34 -0700
From: mcafee@artemis.transmeta.com (Sean McAfee)
Subject: Re: anonymous code refs and 'sort'
Message-Id: <9me552$jsc$1@artemis.transmeta.com>
In article <3B8A5C08.726E8DAA@uswest.com>,
Mr Sunblade <djberge@uswest.com> wrote:
>Rainer Klier wrote:
>> mypackage::sortArray(\sub { $mypackage::a <=> $mypackage::b });
>> package mypackage;
>> sub sortArray{
>> my $coderef = shift;
>> my @array = qw(3 4 10 1 2 3);
>> my @sorted = sort { &$$coderef } @array;
>> print "Sorted: ", join(',',@sorted),"\n";
>> }
>2 things...
>1) Thanks!
>2) Ick!
As noted by someone else, the extra level of referencing with the sub is
unnecessary. Another approach is to alias $a and $b in mypackage to the
same-named variables in the calling package, like so:
mypackage::sortArray(sub { $a <=> $b });
package mypackage;
sub sortArray {
my $coderef = shift;
my $caller = caller;
local (*a, *b) = do {
no strict 'refs';
(*{"${caller}::a"}, *{"${caller}::b"});
};
my @array = qw(3 4 10 1 2 3);
my @sorted = sort { $coderef->() } @array;
print "Sorted: @sorted\n";
}
Of course, this depends on $a and $b in the subroutine reference passed to
sortArray being the ones in the package that calls sortArray.
--
Sean McAfee mcafee@umich.edu
print eval eval eval eval eval eval eval eval eval eval eval eval eval eval
q!q@q#q$q%q^q&q*q-q=q+q|q~q:q? Just Another Perl Hacker ?:~|+=-*&^%$#@!
------------------------------
Date: Mon, 27 Aug 2001 15:39:40 -0400
From: "Kristina Clair" <kclair@soya.serve.com>
Subject: Benchmark
Message-Id: <9me7p6$jvt@netaxs.com>
I was trying to use Benchmark to find the fastest way to collate a bunch
of files (one way was all with perl, the other was using cat... i pretty
much knew which would be faster, but i wanted to test Benchmark).
The result I got is:
Temp file time:
2 wallclock secs ( 1.95 usr + 0.14 sys = 2.09 CPU)
Cat file time:
16 wallclock secs ( 1.99 usr 0.44 sys + 11.16 cusr 1.86 csys = 0.00
CPU)
It's puzzling to me that the second report says that it took 0.00 CPU.
Is there an explanation for this?
Thanks,
kristina
------------------------------
Date: 27 Aug 2001 16:01:58 -0400
From: Joe Schaefer <joe+usenet@sunstarsys.com>
Subject: Re: Benchmark
Message-Id: <m38zg5s24p.fsf@mumonkan.sunstarsys.com>
"Kristina Clair" <kclair@soya.serve.com> writes:
> I was trying to use Benchmark to find the fastest way to collate a bunch
> of files (one way was all with perl, the other was using cat... i pretty
> much knew which would be faster, but i wanted to test Benchmark).
>
> The result I got is:
>
> Temp file time:
> 2 wallclock secs ( 1.95 usr + 0.14 sys = 2.09 CPU)
>
> Cat file time:
> 16 wallclock secs ( 1.99 usr 0.44 sys + 11.16 cusr 1.86 csys = 0.00
> CPU)
>
>
> It's puzzling to me that the second report says that it took 0.00 CPU.
>
> Is there an explanation for this?
Yes- your Benchmark.pm has a bug in it. I would guess that the offending
code is (usenet wrapped)
$s=sprintf(
"%2d wallclock secs (%$f usr %$f sys + %$f cusr %$f csys = %$f CPU)",
@t,$t) if $style eq 'all';
Of course, @t == 6, not 5. More recent versions don't have this problem.
--
Joe Schaefer "I must have a prodigious quantity of mind; it takes me as much
as a week sometimes to make it up."
--Mark Twain
------------------------------
Date: Mon, 27 Aug 2001 18:41:19 GMT
From: "Kurt Stephens" <vze2r2j8@verizon.net>
Subject: Blessings with DBI fetchrow_hashref?
Message-Id: <jvwi7.1$XN3.10417@typhoon2.gnilink.net>
A recent post had me thinking: Why would anyone want to use the DBI
statement method $sth->fetchrow_hashref? This lead me to ponder the
following:
$sth->execute or die $sth->errstr;
while (my $object = $sth->fetchrow_hashref) {
bless $object, 'SomePackage';
$object->some_method();
}
Naturally, this would work with fetchrow_arrayref as well. Has anyone out
there played around with this? Comments and war stories would be
appreciated.
------------------------------
Date: Mon, 27 Aug 2001 19:23:31 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: Blessings with DBI fetchrow_hashref?
Message-Id: <3B8A9E0D.DFDB49A7@rochester.rr.com>
Kurt Stephens wrote:
>
> A recent post had me thinking: Why would anyone want to use the DBI
> statement method $sth->fetchrow_hashref? ...
Well, fetchrow_hashref returns the field names, which is most helpful if
you don't already know them.
--
Bob Walton
------------------------------
Date: Mon, 27 Aug 2001 19:41:57 GMT
From: "Kurt Stephens" <vze2r2j8@verizon.net>
Subject: Re: Blessings with DBI fetchrow_hashref?
Message-Id: <9oxi7.2$Tz.703@typhoon2.gnilink.net>
"Bob Walton" <bwalton@rochester.rr.com> wrote in message
news:3B8A9E0D.DFDB49A7@rochester.rr.com...
> Kurt Stephens wrote:
> >
> > A recent post had me thinking: Why would anyone want to use the DBI
> > statement method $sth->fetchrow_hashref? ...
>
> Well, fetchrow_hashref returns the field names, which is most helpful if
> you don't already know them.
> --
> Bob Walton
So does $sth->{NAME}. I was actually more interested in comments regarding
OO shenanigans with the returned rowsets.
------------------------------
Date: Mon, 27 Aug 2001 11:57:01 +0200
From: "Guy" <guymal@__NOSPAM__hotmail.com>
Subject: Re: CGI redirect
Message-Id: <3b8a0bd1@news.barak.net.il>
"Michael Budash" <mbudash@sonic.net> wrote in message
news:mbudash-7EA3AF.01135127082001@news.sonic.net...
> In article <3b889cc3@news.barak.net.il>, "Guy"
> <guymal@__NOSPAM__hotmail.com> wrote:
>
> > "Michael Budash" <mbudash@sonic.net> wrote in message
> > news:mbudash-D8C354.00423925082001@news.sonic.net...
> > > In article <9m6oo5$alt$1@news.netvision.net.il>, "Guy"
> > > <guymal@__NOSPAM_hotmail.com> wrote:
> > >
> > > > "Michael Budash" <mbudash@sonic.net> wrote in message
> > > > news:mbudash-C673C4.23485221082001@news.sonic.net...
> > > > > In article <3b832ff4@news.barak.net.il>, "Guy"
> > > > > <guymal@__NOSPAM__hotmail.com> wrote:
> > > > >
> > > > > > How can I redirect to a url, using POST, and pass it some
> > parameters?
> > > > > >
> > > > > > I'm using CGI.pm to open a saved query:
> > > > > > open(OLD_Q,"$saved_query_path")|| die "Error: $! in file:
> > > > > > ".__FILE__."
> > > > > > line:
> > > > > > ".__LINE__."Cannot open saved query $saved_query_path \n";
> > > > > > my $old_query=new CGI(OLD_Q);
> > > > > > close(OLD_Q);
> > > > > >
> > > > > > and I would like to redirect to a url as if the user submitted a
> > form
> > > > > > (the
> > > > > > parameters from the saved query) to the new url:
> > > > > >
> > > > > > print
> > > > > >
$old_query->redirect("http://my-server.com/cgi-bin/a-script.pl");
> > > > > > #but
> > > > > > I need to pass all saved parameters using POST
> > > > > >
> > > > > > What I basically need is how to do something like this:
> > > > > > my $one=$old_query->param('param_1');
> > > > > > my $two=$old_query->param('param_2');
> > > > > > print
> > > > > >
> > > >
> >
$old_query->redirect("http://my-server.com/cgi-bin/a-script.pl?param_1=$on
> > > > > > e&
> > > > > > param_2=$two....");
> > > > > >
> > > > > > but using POST.
> > > > >
> > > > > use the LWP perl module (which can be found at
> > > > > http://www.perl.com/CPAN-local/modules/by-module/LWP/ as
> > > > > libwww-perl)
> > > > >
> > > >
> > > > LWP would be used to open a connection from the web server to
another
> > > > url.
> > > > What I need is to redirect the USER to another url (just like the
> > > > CGI.pm
> > > > redirect function).
> > >
> > > trust me, you want LWP in a POST scenario. i do it all the time...
read
> > > the LWP docs (type: perldoc lwpcook)... or not, it's your choice...
> > >
> >
> > I've read the LWP documentation several times and used the module many
> > times.
> > Let me explain what I'm trying to achieve:
> > The user goes to a script at a certain url (doesn't matter if the user's
> > request is post or get).
> > The script on the server opens a saved query, sends the contents of the
> > saved query back to the client, and "tells" the client to open a
> > connection
> > to a different url/script and post the saved query it received there.
> >
> > Is this even possible?
> > I read the excellent article that Alan wrote
> > (http://ppewww.ph.gla.ac.uk/~flavell/www/post-redirect.html) but it
> > didn't
> > address anything similar to what I need (where the client gets the query
> > from the server and then posts it somewhere else).
>
> ok, what have you tried so far? what of that worked? what didn't?
>
> in essence, since it's very difficult to do a post-redirect, what you
> will do is impersonate a browser that's doing a post, and simply push
> the received results back to the real browser.
>
> just use the portion of lwpcook dealing with POSTs:
>
> use LWP::UserAgent;
> $ua = new LWP::UserAgent;
>
> my $req = new HTTP::Request
> 'POST','http://my-server.com/cgi-bin/a-script.pl';
> $req->content_type('application/x-www-form-urlencoded');
> my $content;
> foreach ($old_query->param()) {
> $content .= "$_=" . CGI::escape($old_query->param($_)) . '&';
> }
> chop $content; # remove last '&'
> $req->content($content);
>
> my $res = $ua->request($req);
> print $res->as_string;
That's more or less what I did.
I have no problem opening a POST connection from the web server and pushing
the results I get back to the browser.
That's not what I want to do. I want the browser to open the connection.
I need this since the transaction is non-idempotent and I need to assure
that the user doesn't refresh their browser.
Here's what I want to happen:
The user POSTs a request to a url/script.
The script saves the user's query and asks the user for some sort of
authentication.
The user sends the required authentication data, the script
authenticates the user, and if everything is ok with the user, the script
sends back the saved query and the user POSTs the request it originally
wanted.
If I don't send back the saved query (and instead open the connection from
the server, like you suggested) the result would seem the same to the user
BUT, if the user were to refresh their browser then they would be sending
their authentication data again, instead of the POST request they think/want
to send and the saved query would be gone.
Thanks again, I really appreciate all your help.
Guy
------------------------------
Date: 27 Aug 2001 13:01:20 -0700
From: demerphq@hotmail.com (Yves Orton)
Subject: Re: CODE reference to member function of package Confusing..
Message-Id: <74f348f7.0108271201.33230c02@posting.google.com>
nobull@mail.com wrote in message news:<u9snemzxuk.fsf@wcl-l.bham.ac.uk>...
> Komtanoo Pinpimai <romerun@greezi.com> writes a question from the FAQ's..
> So your question is "How can I pass a method?".
> This is a FAQ: "How can I pass/return a {Function, FileHandle, Array,
> Hash, Method, Regex}?"
> > what should I do?
> > suggestion please...
> I suggest that what you should do is check the FAQ before posting to
> Usenet.
Just curious nobull, but do you think that after this comment CLPM
will magically become free of newbies asking questions from the FAQ?
Also did it occur to you that perhaps his English is maybe not native?
And that therefore reading/searching the faqs might not be so easy?
(Oh wait, the concept of not speaking English comes hard as hard to
Brits as to Septic Tanks doesnt it....)
Ive seen the tagline that is attributed to you, the one about this
being a discussion forum and answering questions is purely incidental.
Good comment. But heres one for you:
If you dont like the fact that someone is asking questions that you'd
rather not answer, THEN DONT! Dont bitch, and don't answer.
Yves
PS I bet there is not a soul on CLPM that has not at one time or
another asked a question from the FAQ. Including you.
Yves
------------------------------
Date: Mon, 27 Aug 2001 19:12:33 -0000
From: four12and8up@unspam-me.yahoo.com
Subject: Re: dynamic menu (efficiency)
Message-Id: <tol6t18qhp0iff@corp.supernews.com>
Abigail <abigail@foad.org> tapped:
> For 50 states, efficiency shouldn't be high on your list of priorities.
> Unless you're working on hardware from the 60s, but then you don't want
> to do any interactive stuff anyway.
The states were just an example.
> Take your favourite datastructures textbook
Oh yeah, that. ;)
------------------------------
Date: Mon, 27 Aug 2001 14:18:46 +0500
From: Robert Sherman <rsherman@ce.gatech.edu>
Subject: Re: First Program, Need Help
Message-Id: <3B8A1076.A39526E@ce.gatech.edu>
<snip>
> > 2: I can't figure out a way to get PERL to create combinations of
> > letters and print them, so that they will never be the same. I have spent
> > at least a couple of hours trying to think of a way.(Lines 30-34).
</snip>
perldoc -q permute
--
robert sherman
css, cee
georgia institute of technology
atlanta, ga, usa
------------------------------
Date: Mon, 27 Aug 2001 17:58:11 -0400
From: "JII" <rom616@bellsouth.net>
Subject: Re: First Program, Need Help
Message-Id: <Khzi7.26221$zk4.1361548@e3500-atl1.usenetserver.com>
Thanks! I'll see what I can do now! : )
------------------------------
Date: Mon, 27 Aug 2001 19:18:45 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: form post to https server, best method
Message-Id: <3B8A9CEF.1C498C7C@rochester.rr.com>
Dennis wrote:
...
> Could you tell me where to get the easy to install modules for NT and
> Solaris since all I can find is source to be compiled
...
Well, the LWP module should already be on your hard drive. Assuming you
are using ActiveState Perl for NT and Solaris, you would use:
ppm install Crypt-SSLeay
at a command prompt to get the Crypt::SSLeay module if you don't already
have it. Otherwise, you will need to compile the modules, which isn't
that big of a deal, at least on a Unix system.
--
Bob Walton
------------------------------
Date: Mon, 27 Aug 2001 19:16:21 +0100
From: "SHP II - The Return of The Jock" <spamsimonfarmer@yahoo.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <9me2o7$1mbl9$1@ID-23857.news.dfncis.de>
"Markus Laire" <markus.laire@usa.net> wrote in message
news:Xns910AA041C26B6markuslaire@192.89.123.233...
> "Brian A. Stumm" <bs@bs-linux.com> wrote in
> news:Pine.LNX.4.21.0108262009150.3683-100000@bdslppp62.spkn.uswest.net:
> >
> > But to answer the question, Sex is better. Eventually Perl will be
> > outdated and obsolete. Sex ensures that their will be future programmers
> > creating newer, better software...
>
> You don't need sex for that if you just write learning AI in perl for
> developing better Perl/other software.
>
> So perl is better because there is no need for sex anymore. ;)
wouldnt that be inbreeding though?
--
-=SatansHandPuppet[TiT]=-
http://www.freespeech.org/thediary
http://freespace.morat.net/bttos
http://ladders.morat.net/muktfcl
------------------------------
Date: Mon, 27 Aug 2001 12:50:40 -0700
From: "Brian A. Stumm" <bs@bs-linux.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <Pine.LNX.4.21.0108271250190.11577-100000@bdslppp62.spkn.uswest.net>
On Mon, 27 Aug 2001, vanyel On RR wrote:
>
> >
> > But to answer the question, Sex is better. Eventually Perl will be
> > outdated and obsolete. Sex ensures that their will be future programmers
> > creating newer, better software...
> >
> Only if you do it right.
>
>
>
>
I'm the Brain. I do everything right...
--
a8888b.
Brian A. Stumm d888888b.
bs@bs-linux.com 8P"YP"Y88
http://www.bs-linux.com 8|o||o|88
The Choice of a Gnu Generation 8' .88
8`._.' Y8.
# d/ `8b.
#### ### .dP . Y8b.
## # d8:' " `::88b.
## ### ### ### ### ### ### ### d8" `Y88b
## # ## ### ## ## ## ## ## :8P ' :888
## # ## ## ## ## ## ### 8a. : _a88P
## ### ## ## ## ## ### ._/"Yaa_ : .| 88P|
## # ### ## ## ## ## ## ## \ YP" `| 8P `.
## ## ### # ## ## ### ### ## ## / \._____.d| .'
######### ### #### #### ### ### ### ### `--..__)888888P`._.'
------------------------------
Date: 27 Aug 2001 20:19:54 GMT
From: trammell@haqq.hypersloth.invalid (John J. Trammell)
Subject: Re: fwd: Sex or perl?
Message-Id: <slrn9olq0v.jqr.trammell@haqq.hypersloth.net>
On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> I'm the Brain. I do everything right...
+10 points for pro-GNU .sig
-10000 points for 18-line .sig
http://www.math.fu-berlin.de/~guckes/afw/
--
[M]en become civilized, not in proportion to their willingness to believe,
but in proportion to their willingness to doubt. - H.L. Mencken
------------------------------
Date: Mon, 27 Aug 2001 20:41:40 GMT
From: Little Pussy <bemsha@midsouthSPAM.rr.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <MPG.15f46c81e653c5a5989882@news-server.midsouth.rr.com>
In the Ancient Tome of " <slrn9olq0v.jqr.trammell@haqq.hypersloth.net> ",
John J. Trammell The Feeble said...
> On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> > I'm the Brain. I do everything right...
>
> +10 points for pro-GNU .sig
> -10000 points for 18-line .sig
>
> http://www.math.fu-berlin.de/~guckes/afw/
>
Yeah! Brain is so thoughtless!
--
Bemsha - Now You Know.®
Professor, Human Search Engine Mechanics,
University of Pants
"Hentai porn anime should not require explication. If I have to tell you,
then Google isn't doing it's job." - Mark Morford
"It just over the next dune, I swear to God!" -- Moses
"Nothing will benefit human health and increase the chances for survival
on Earth as much as the evolution to a vegetarian diet." -- Albert
Einstein
I love little pussy,
His coat is so warm,
And if I don't hurt him,
He'll do me no harm.
I'll sit by the fire
And give him some food,
And pussy will love me
Because I am good.
------------------------------
Date: Mon, 27 Aug 2001 14:04:47 -0700
From: "Brian A. Stumm" <bs@bs-linux.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <Pine.LNX.4.21.0108271403520.12296-100000@bdslppp62.spkn.uswest.net>
On 27 Aug 2001, John J. Trammell wrote:
> On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> > I'm the Brain. I do everything right...
>
> +10 points for pro-GNU .sig
> -10000 points for 18-line .sig
>
> http://www.math.fu-berlin.de/~guckes/afw/
>
>
Ah thanks, you know it's my goal in life to have the largest number of
negative points. I'm currently at 21,890,136 and growing...
--
a8888b.
Brian A. Stumm d888888b.
bs@bs-linux.com 8P"YP"Y88
http://www.bs-linux.com 8|o||o|88
The Choice of a Gnu Generation 8' .88
8`._.' Y8.
# d/ `8b.
#### ### .dP . Y8b.
## # d8:' " `::88b.
## ### ### ### ### ### ### ### d8" `Y88b
## # ## ### ## ## ## ## ## :8P ' :888
## # ## ## ## ## ## ### 8a. : _a88P
## ### ## ## ## ## ### ._/"Yaa_ : .| 88P|
## # ### ## ## ## ## ## ## \ YP" `| 8P `.
## ## ### # ## ## ### ### ## ## / \._____.d| .'
######### ### #### #### ### ### ### ### `--..__)888888P`._.'
------------------------------
Date: Mon, 27 Aug 2001 21:48:25 GMT
From: Little Pussy <bemsha@midsouthSPAM.rr.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <MPG.15f47c265df68cdd989884@news-server.midsouth.rr.com>
In the Ancient Tome of " <Pine.LNX.4.21.0108271403520.12296-100000
@bdslppp62.spkn.uswest.net> ", Brian A. Stumm The Feeble said...
> On 27 Aug 2001, John J. Trammell wrote:
>
> > On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> > > I'm the Brain. I do everything right...
> >
> > +10 points for pro-GNU .sig
> > -10000 points for 18-line .sig
> >
> > http://www.math.fu-berlin.de/~guckes/afw/
> >
> >
> Ah thanks, you know it's my goal in life to have the largest number of
> negative points. I'm currently at 21,890,136 and growing...
>
/awards Brain +33,456,239 'That's-A-Fuck-Load-of-Points' points
--
Bemsha - Now You Know.®
Professor, Human Search Engine Mechanics,
University of Pants
"Hentai porn anime should not require explication. If I have to tell you,
then Google isn't doing it's job." - Mark Morford
"It just over the next dune, I swear to God!" -- Moses
"Nothing will benefit human health and increase the chances for survival
on Earth as much as the evolution to a vegetarian diet." -- Albert
Einstein
I love little pussy,
His coat is so warm,
And if I don't hurt him,
He'll do me no harm.
I'll sit by the fire
And give him some food,
And pussy will love me
Because I am good.
------------------------------
Date: Mon, 27 Aug 2001 14:46:20 -0700
From: "Brian A. Stumm" <bs@bs-linux.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <Pine.LNX.4.21.0108271444490.12574-100000@bdslppp62.spkn.uswest.net>
On Mon, 27 Aug 2001, Little Pussy wrote:
> In the Ancient Tome of " <slrn9olq0v.jqr.trammell@haqq.hypersloth.net> ",
> John J. Trammell The Feeble said...
>
> > On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> > > I'm the Brain. I do everything right...
> >
> > +10 points for pro-GNU .sig
> > -10000 points for 18-line .sig
> >
> > http://www.math.fu-berlin.de/~guckes/afw/
> >
>
> Yeah! Brain is so thoughtless!
>
>
Well then that's -11,666.66* points for you Bemsha.
*mathematical equation based on the fact that 18 line sig equals negative
10,000 points.
--
a8888b.
Brian A. Stumm d888888b.
bs@bs-linux.com 8P"YP"Y88
http://www.bs-linux.com 8|o||o|88
The Choice of a Gnu Generation 8' .88
8`._.' Y8.
# d/ `8b.
#### ### .dP . Y8b.
## # d8:' " `::88b.
## ### ### ### ### ### ### ### d8" `Y88b
## # ## ### ## ## ## ## ## :8P ' :888
## # ## ## ## ## ## ### 8a. : _a88P
## ### ## ## ## ## ### ._/"Yaa_ : .| 88P|
## # ### ## ## ## ## ## ## \ YP" `| 8P `.
## ## ### # ## ## ### ### ## ## / \._____.d| .'
######### ### #### #### ### ### ### ### `--..__)888888P`._.'
------------------------------
Date: Mon, 27 Aug 2001 23:33:36 GMT
From: Little Pussy <bemsha@midsouthSPAM.rr.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <MPG.15f494d3947d4537989885@news-server.midsouth.rr.com>
In the Ancient Tome of " <Pine.LNX.4.21.0108271444490.12574-100000
@bdslppp62.spkn.uswest.net> ", Brian A. Stumm The Feeble said...
> On Mon, 27 Aug 2001, Little Pussy wrote:
>
> > In the Ancient Tome of " <slrn9olq0v.jqr.trammell@haqq.hypersloth.net> ",
> > John J. Trammell The Feeble said...
> >
> > > On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> > > > I'm the Brain. I do everything right...
> > >
> > > +10 points for pro-GNU .sig
> > > -10000 points for 18-line .sig
> > >
> > > http://www.math.fu-berlin.de/~guckes/afw/
> > >
> >
> > Yeah! Brain is so thoughtless!
> >
> >
> Well then that's -11,666.66* points for you Bemsha.
>
> *mathematical equation based on the fact that 18 line sig equals negative
> 10,000 points.
>
Oh yeah? Well, that was another -10,000 for you!
--
Bemsha - Now You Know.®
Professor, Human Search Engine Mechanics,
University of Pants
"Hentai porn anime should not require explication. If I have to tell you,
then Google isn't doing it's job." - Mark Morford
"It just over the next dune, I swear to God!" -- Moses
"Nothing will benefit human health and increase the chances for survival
on Earth as much as the evolution to a vegetarian diet." -- Albert
Einstein
I love little pussy,
His coat is so warm,
And if I don't hurt him,
He'll do me no harm.
I'll sit by the fire
And give him some food,
And pussy will love me
Because I am good.
------------------------------
Date: Mon, 27 Aug 2001 16:34:36 -0700
From: Brian Stumm <bs@bs-linux.com>
Subject: Re: fwd: Sex or perl?
Message-Id: <3B8AD90C.31F7CEB8@bs-linux.com>
Little Pussy wrote:
> In the Ancient Tome of " <Pine.LNX.4.21.0108271403520.12296-100000
> @bdslppp62.spkn.uswest.net> ", Brian A. Stumm The Feeble said...
>
> > On 27 Aug 2001, John J. Trammell wrote:
> >
> > > On Mon, 27 Aug 2001 12:50:40 -0700, Brian A. Stumm <bs@bs-linux.com> wrote:
> > > > I'm the Brain. I do everything right...
> > >
> > > +10 points for pro-GNU .sig
> > > -10000 points for 18-line .sig
> > >
> > > http://www.math.fu-berlin.de/~guckes/afw/
> > >
> > >
> > Ah thanks, you know it's my goal in life to have the largest number of
> > negative points. I'm currently at 21,890,136 and growing...
> >
>
> /awards Brain +33,456,239 'That's-A-Fuck-Load-of-Points' points
me evil plan is a success.
Muahahahahahahahahaha
------------------------------
Date: Mon, 27 Aug 2001 20:53:34 +0200
From: "Steffen Müller" <tsee@gmx.net>
Subject: Re: Godzilla flame
Message-Id: <9me4nv$p73$05$1@news.t-online.com>
"Godzilla!" <godzilla@stomp.stomp.tokyo> schrieb im Newsbeitrag
news:3B8A933D.D168DC0@stomp.stomp.tokyo...
> My hunch is you are looking to others to provide
> solutions for a module you wish to write and
> later publish.
Umm, forgot to mention this point in the last post:
What would such a module be used for anyway?
And if I'm just going to steal a bit of code from the files, I could do that
from a standalone script, too. Or I could also ask for it here.
Or see: 3lqlmt4kpdkevf6uaihh6flbhb6ph4of82@4ax.com
The contest's platform code will be made publically availlable, by the way.
May I suggest that you're paranoid?
Steffen
------------------------------
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.
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 1629
***************************************
