[12926] in Perl-Users-Digest
Perl-Users Digest, Issue: 336 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 2 15:07:18 1999
Date: Mon, 2 Aug 1999 12:05:14 -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 Mon, 2 Aug 1999 Volume: 9 Number: 336
Today's topics:
Re: <<END_OF_TEXT function <flavell@mail.cern.ch>
Re: [Summary] Korn Shell or Perl? (Anno Siegel)
Re: [Summary] Korn Shell or Perl? (I R A Darth Aggie)
Re: ANNOUNCE: Perl Conference papers <lusol@Pandora.CC.Lehigh.EDU>
Re: binary data (I R A Darth Aggie)
Re: BOOLEAN SEARCH psdsp@my-deja.com
Re: BOOLEAN SEARCH inlandpac@my-deja.com
C++ codes. <humpet@yesic.com>
Re: C++ codes. <collin.starkweather@colorado.edu>
Re: chmod function <aqumsieh@matrox.com>
Escaping out of prompts.. <portboy@home.com>
Re: How to determine a date in the past <flavell@mail.cern.ch>
Re: IP Address validation (Malcolm Ray)
Re: IP Validation (I R A Darth Aggie)
Logical Construction <anonymous@web.remarq.com>
Re: Looking for a Regular Expression to do an exact mat <aperrin@mcmahon.qal.berkeley.edu>
Re: Newbie Q: How to check if invoked as CGI program <andrewf@beausys.freeserve.co.uk>
Re: Perl Begineer Question... (Larry Rosler)
Re: perl Upload Triggering <nigh_postal@my-deja.com>
Question dealing with inlined my (Jete Software Inc.)
Re: RegExp: Searching all items of an array <aqumsieh@matrox.com>
Re: why are you so harsh to this guy ? <jcreed@cyclone.jprc.com>
Re: why are you so harsh to this guy ? <aqumsieh@matrox.com>
Re: why are you so harsh to this guy ? <flavell@mail.cern.ch>
Re: why are you so harsh to this guy ? (I R A Darth Aggie)
Re: why are you so harsh to this guy ? <sariq@texas.net>
Re: Why won't this little script work? <aqumsieh@matrox.com>
Re: working with = sign in a directory name - please he (I R A Darth Aggie)
Re: working with = sign in a directory name - please he <tflynn@iastate.edu>
Re: Y2K in Washington (Was: Re: print "Location: http:/ (I R A Darth Aggie)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 2 Aug 1999 19:23:29 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: <<END_OF_TEXT function
Message-Id: <Pine.HPP.3.95a.990802191532.3783J-100000@hpplus03.cern.ch>
On 2 Aug 1999, Kai Henningsen wrote:
> And again, that won't help you with a ascii/binary ftp problem
OK, you have a good point.
(the rest is OT so I'll be as brief as poss)
> > > SBB?
No, I lifted it from a usenet posting which you can review here
http://www.deja.com/=dnc/getdoc.xp?AN=505430142
--
"... The fire service had no explanation why the iguana
and the man were up the tree" - BBC teletext news item
------------------------------
Date: 2 Aug 1999 17:32:53 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: [Summary] Korn Shell or Perl?
Message-Id: <7o4ko5$90g$1@lublin.zrz.tu-berlin.de>
Tom Christiansen <tchrist@mox.perl.com> wrote in comp.lang.perl.misc:
> [courtesy cc of this posting mailed to cited author]
>
>In comp.lang.perl.misc,
> anno4000@lublin.zrz.tu-berlin.de (Anno Siegel) writes:
>:originator of this thread was quetching about.
>
>I doubt whether in German you would pronounce them differently, but I
>had thought that you'd really meant "kvetch" there, as least as we commonly
I did, and corrected it in a superseding version of the article. The
modern German cognate is "quetschen", which influenced me.
Anno
------------------------------
Date: 2 Aug 1999 18:25:44 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: [Summary] Korn Shell or Perl?
Message-Id: <slrn7qbope.q33.fl_aggie@thepentagon.com>
On 2 Aug 1999 10:14:00 -0500, Abigail <abigail@delanet.com>, in
<slrn7qbdcl.r33.abigail@alexandra.delanet.com> wrote:
+ Daniel Grisinger (dgris@moiraine.dimensional.com) wrote on MMCLXII
+ .. Nope, it's right there-
+ .. my $pid = open(P, "-|); # this forks
+ Only if you make it compile....
I think you have to use a new module:
use Faith::Wish; # I wish it worked...or perhaps:
use Faith::Hope; # I hope this works
:)
James - durn pesky "'s...
------------------------------
Date: 31 Jul 1999 00:38:33 GMT
From: "Stephen O. Lidie" <lusol@Pandora.CC.Lehigh.EDU>
Subject: Re: ANNOUNCE: Perl Conference papers
Message-Id: <7ntgi9$s9a@fidoii.cc.Lehigh.EDU>
Abigail <abigail@delanet.com> wrote:
> Tom Christiansen (tchrist@mox.perl.com) wrote on MMCLIX September
> MCMXCIII in <URL:news:37a224c3@cs.colorado.edu>:
> () The refereed papers for the upcoming Perl Conference are talked about
> () here:
> ()
> () http://www.perl.com/pub/n/Papers_Selected_for_Perl_Conference_3.0
> ()
> () and listed here:
> ()
> () http://conference.oreilly.com/perl3/conf_desc.html#papers
> Oh goodie. Now I can go off and sulk even more about the fact that I'm
> not coming to TPC.
Think YAPC, Grasshopper.
------------------------------
Date: 2 Aug 1999 17:20:47 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: binary data
Message-Id: <slrn7qbkvl.q33.fl_aggie@thepentagon.com>
On Mon, 2 Aug 1999 08:44:22 -0700, Larry Rosler <lr@hpl.hp.com>, in
<MPG.120f5caa3e3eddcf989d96@nntp.hpl.hp.com> wrote:
+ But you have omitted constants.
Indeed. Perhaps I should go and read more carefully perlstyle.
+ UPPERCASE for subroutine-like constants
That would be rather useful.
+ see no harm in using all uppercase for them, if they are treated as
+ constants for the duration of the execution.
No harm, just a style convention. To my eyes, all CAPS are ugly and
stand out. Which is an excellent way of having them say "HI, I'M LOUD
AND I'M CONSTANT".
James
------------------------------
Date: Mon, 02 Aug 1999 17:52:58 GMT
From: psdsp@my-deja.com
Subject: Re: BOOLEAN SEARCH
Message-Id: <7o4ltk$usi$1@nnrp1.deja.com>
In article <7o4h17$r46$1@nnrp1.deja.com>,
inlandpac@my-deja.com wrote:
> I have a script that fetches URLs (using LWP::UserAgent) via search
> engines and then searches those urls for specific words.
>
> What I am trying to do is modify the search to include boolean
> operators.
>
> One example is this:
>
> I need to take the initial search keyword (let's use 'pepsi') and then
> search each URL that comes up with that keyword for the keyword and
one
> extra word (let's use 'like') but with these limitations:
>
> 'pepsi' and 'like' cannot be one word,
> 'pepsi' and 'like' cannot be one right after each other (such as, "I
> like pepsi"),
> and the words must be within one word of each other (such as, "Pepsi
is
> like....).
>
> Does anyone know how to create this search pattern?
>
> It seems that this would be quite complicated (at least for me since I
> am not too experienced in this area).
>
> Can anyone help, please?
>
> Thanks,
> Chad.
> passme
I am not sure whether I understand your requirements
completely.
Anyway, try this:
$wrd1 = "sexy";
$wrd2 = "camel";
$line1 = "sexycamel";
if ($line1 =~ /$wrd1$wrd2/) {
print "Consecutive.\n";
}
$line2 = "sexy cool camel";
if ($line2 =~ /$wrd1\s+\w+\s+$wrd2/ ) {
print "They are fine.\n";
}
Hope that helps:
-Deva
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 02 Aug 1999 18:26:09 GMT
From: inlandpac@my-deja.com
Subject: Re: BOOLEAN SEARCH
Message-Id: <7o4nrj$e6$1@nnrp1.deja.com>
You understood correctly and this is also what I came up with in part.
Thanks,
Chad.
In article <7o4ltk$usi$1@nnrp1.deja.com>,
psdsp@my-deja.com wrote:
> In article <7o4h17$r46$1@nnrp1.deja.com>,
> inlandpac@my-deja.com wrote:
> > I have a script that fetches URLs (using LWP::UserAgent) via search
> > engines and then searches those urls for specific words.
> >
> > What I am trying to do is modify the search to include boolean
> > operators.
> >
> > One example is this:
> >
> > I need to take the initial search keyword (let's use 'pepsi') and
then
> > search each URL that comes up with that keyword for the keyword and
> one
> > extra word (let's use 'like') but with these limitations:
> >
> > 'pepsi' and 'like' cannot be one word,
> > 'pepsi' and 'like' cannot be one right after each other (such as, "I
> > like pepsi"),
> > and the words must be within one word of each other (such as, "Pepsi
> is
> > like....).
> >
> > Does anyone know how to create this search pattern?
> >
> > It seems that this would be quite complicated (at least for me
since I
> > am not too experienced in this area).
> >
> > Can anyone help, please?
> >
> > Thanks,
> > Chad.
> > passme
>
> I am not sure whether I understand your requirements
> completely.
>
> Anyway, try this:
> $wrd1 = "sexy";
> $wrd2 = "camel";
>
> $line1 = "sexycamel";
>
> if ($line1 =~ /$wrd1$wrd2/) {
> print "Consecutive.\n";
> }
>
> $line2 = "sexy cool camel";
> if ($line2 =~ /$wrd1\s+\w+\s+$wrd2/ ) {
> print "They are fine.\n";
> }
>
> Hope that helps:
> -Deva
>
> Sent via Deja.com http://www.deja.com/
> Share what you know. Learn what you don't.
>
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 02 Aug 1999 13:07:21 -0700
From: Parents <humpet@yesic.com>
Subject: C++ codes.
Message-Id: <37A5FA79.DFF92735@yesic.com>
Dear Experts!
I need to keep some codes as a C++ class and a perl module. It will be
not comfortable to have two different source files. Are there any tools
to generate perl codes from C++ ones or to create C++ and perl from some
intermediate format?
What is the best way to solve this problem?
Regards,
Serguei
------------------------------
Date: Mon, 02 Aug 1999 12:56:12 -0600
From: Collin Starkweather <collin.starkweather@colorado.edu>
To: Parents <humpet@yesic.com>
Subject: Re: C++ codes.
Message-Id: <37A5E9CC.D9344403@colorado.edu>
Check out Advanced Perl Programming by Sriram Srinivasan, chapter 18
("Extending Perl: A First Course") and possibly chapter 19 ("Embedding
Perl").
-Collin
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Collin Starkweather (303) 492-4784
University of Colorado collin.starkweather@colorado.edu
Department of Economics http://ucsu.colorado.edu/~olsonco
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Parents wrote:
>
> Dear Experts!
> I need to keep some codes as a C++ class and a perl module. It will be
> not comfortable to have two different source files. Are there any tools
> to generate perl codes from C++ ones or to create C++ and perl from some
> intermediate format?
> What is the best way to solve this problem?
> Regards,
> Serguei
------------------------------
Date: Mon, 2 Aug 1999 12:16:06 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: chmod function
Message-Id: <x3y7lnenoop.fsf@tigre.matrox.com>
abc@abc.net (NiteFever) writes:
>
> I'm tring to make this work:
>
> $OrignialLogFile = 'sample.txt'
> ..
> ..
> ..
> ..
> chmod (0770, $OrignialLogFile)
>
> What won't this work?
It should work? Did you try it? Do you have semicolons at the end of
your statements?
------------------------------
Date: Mon, 02 Aug 1999 17:32:50 GMT
From: Mitch <portboy@home.com>
Subject: Escaping out of prompts..
Message-Id: <37A56642.CD48D05@home.com>
In my script, the user at times will be put into a series of questions
(obviously) waiting for responses. I am using the "readline" module and
he's a sample of the code that prompts the user for input:
my $ip = $_ = $term->readline($prompt_ip, "0");
my $port = $_ = $term->readline($prompt_port, "1234");
my $port2 = $_ = $term->readline($prompt_port2, "5678");
my $ans = $_ = $term->readline($prompt_ans, "n");
Which would output something like:
Enter IP: 0
Enter port: 1234
Enter port2: 5678
Ans: n
Now, my question is this...let's say the user is at the "port2" prompt.
They've decided that they don't want to answer these questions anymore,
and return back to my scripts prompt by hitting CTRL-D or something.
How can I setup CTRL-D (or some other hotkey) to kill out of these
prompts, and return back to my scripts prompt?
Thanks again,
mitch
------------------------------
Date: Mon, 2 Aug 1999 19:15:08 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: How to determine a date in the past
Message-Id: <Pine.HPP.3.95a.990802191441.3783I-100000@hpplus03.cern.ch>
On Thu, 29 Jul 1999, Phil R Lawrence wrote:
> This gives MM-DD-YYYY...
How unfortunate, in a world wide context.
------------------------------
Date: 2 Aug 1999 17:26:40 GMT
From: M.Ray@ulcc.ac.uk (Malcolm Ray)
Subject: Re: IP Address validation
Message-Id: <slrn7qbl6g.qsf.M.Ray@carlova.ulcc.ac.uk>
On Mon, 02 Aug 1999 15:37:12 GMT, dave4000@my-deja.com <dave4000@my-deja.com>
wrote:
>I require a small routine that validates an IP address that has been
>entered.
>
>The following routine, accepts invalid addresses such as 123.45 or
>123.45...67
But 123.45 is a perfectly valid abbreviation for 123.0.0.45. Remember,
the dotted-quad form is just a convenient way of writing a 32-bit
quantity, and the convenience extends to allowing you to abbreviate
the address, as described in this extract from the Solaris manpage
for inet_addr(3):
Values specified using the `.' notation take one of the
following forms:
a.b.c.d
a.b.c
a.b
a
When four parts are specified, each is interpreted as a byte
of data and assigned, from left to right, to the four bytes
of an Internet address.
When a three part address is specified, the last part is
interpreted as a 16-bit quantity and placed in the right
most two bytes of the network address. This makes the three
part address format convenient for specifying Class B net-
work addresses as "128.net.host".
When a two part address is supplied, the last part is inter-
preted as a 24-bit quantity and placed in the right most
three bytes of the network address. This makes the two part
address format convenient for specifying Class A network
addresses as "net.host".
When only one part is given, the value is stored directly in
the network address without any byte rearrangement.
So 2130706433 is a valid IP address too!
--
Malcolm Ray University of London Computer Centre
------------------------------
Date: 2 Aug 1999 18:11:16 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: IP Validation
Message-Id: <slrn7qbnu9.q33.fl_aggie@thepentagon.com>
On Mon, 02 Aug 1999 15:23:17 GMT, dave4000@my-deja.com
<dave4000@my-deja.com>, in <7o4d4o$o2s$1@nnrp1.deja.com> wrote:
+ I need a small routine that checks the validation
+ of an IP address.
Do a deja.com search on this, it has been discussed before.
+ sub ip_add_chk {
+ if ($ip=~/[0-9].[0-9].[0-9].[0-9]/) {
Oh. Well, I came up with this:
if ($ip=~/(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/) {
#blah blah blah
}
Butt-ugly, but it seems to work. Currently in testing, but hasn't
completed. No errors so far. :)
+ $ip="$1.$2.$3.$4";
That isn't going to work. What's setting $1..$4? I'm not a regex expert,
but according to 'man perlre', the $<digit> is set via the grouping
mechanism:
if ($ip=~/(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/) {
^^^^^^^ ^^^^^^^ ^^^^^^^ ^^^^^^^
$1 $2 $3 $4 [and so on]
and you aren't using any groupings. Additional explaination:
\d{1,3} == match digits, at least 1, and at most 3
\. == literal period, tho just a plain '.' (match any character except
\n) should work
Caveats: You'll have to test the range of $1..$4 to insure that it is
within the 0..255 IPv4 range. Somehow, I don't think this will work
with IPv6, which should be coming to a network near you Real Soon Now.
James
------------------------------
Date: Mon, 02 Aug 1999 10:02:08 -0800
From: Samay <anonymous@web.remarq.com>
Subject: Logical Construction
Message-Id: <933616932.6194@www2.remarq.com>
Hi, I am looking for perl code that can do following type
of activity.
while(more X){
PROCESS the value returned by X;
}
sub X{
foreach (1..10){
return ONE_AT_A_TIME $_;
}
}
By simple understanding..
X should return 1,2,3 resepectively and will be processed
by main.
At the end there won't be anything to return and while loop
will stop..
Well, off course, you know, foreach (1..10) is just an
example, not representing my complex data structure.
Thank You
Samay.
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Mon, 02 Aug 1999 10:22:06 -0700
From: Andrew J Perrin <aperrin@mcmahon.qal.berkeley.edu>
Subject: Re: Looking for a Regular Expression to do an exact match case indepenent
Message-Id: <37A5D3BE.5BAC62BA@mcmahon.qal.berkeley.edu>
Tom Christiansen wrote:
> Maybe in perl6 we'll see a "LIKE" operator as a
> more legible version of the "=~" operator.
>
> --tom, who hopes that the smileys are implicit
Jeez, I hope so - making perl more like SQL seems akin to making fine
French cuisine more like McDonald's for its ease of use....
--
-------------------------------------------------------------
Andrew Perrin - NT/Unix/Access Consulting -
aperrin@mcmahon.qal.berkeley.edu
http://www.geocities.com/SiliconValley/Grid/7544/
-------------------------------------------------------------
------------------------------
Date: Mon, 2 Aug 1999 16:22:53 +0100
From: Andrew Fry <andrewf@beausys.freeserve.co.uk>
Subject: Re: Newbie Q: How to check if invoked as CGI program
Message-Id: <zt1j+FANfbp3Ew52@beausys.freeserve.co.uk>
My thanks to all those who responded in this thread
and pointed me in the right direction.
Much appreciated.
I owe you a virtual beer. ;)
---
Andrew Fry
"Time flies like an arrow. Fruit flies like a banana". (Groucho Marx).
------------------------------
Date: Mon, 2 Aug 1999 11:09:11 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Perl Begineer Question...
Message-Id: <MPG.120f7ea69545b151989d99@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <37A6A2BE.99DF2DB9@comp.polyu.edu.hk> on Tue, 03 Aug 1999
01:05:18 -0700, Jimmy <c6635500@comp.polyu.edu.hk> says...
[twice, unfortunately]
> If the length of variable A (after trim) is equal to zero, then put
> $no_of_space space characters into variable B.
>
> So :
>
> if length(trim($A)) == 0 then {
> put null string to variable B, the length of null string is
> equal to $no_of_space value
> }
'Null string' means specifically "" -- a string with length 0.
> How can I implement the above requirements in Perl?
Read perlop:
Binary ``x'' is the repetition operator. In scalar context, it returns a
string consisting of the left operand repeated the number of times
specified by the right operand. ...
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 02 Aug 1999 17:23:47 GMT
From: nigh_postal <nigh_postal@my-deja.com>
Subject: Re: perl Upload Triggering
Message-Id: <7o4k6n$tg1$1@nnrp1.deja.com>
*chuckle* My question is whether or not I should use perl or javascript
to try and attempt this. From your response I would have to assume
java-script :P
In article <slrn7qbesp.r33.abigail@alexandra.delanet.com>,
abigail@delanet.com wrote:
> nigh_postal (nigh_postal@my-deja.com) wrote on MMCLXII September
MCMXCIII
> in <URL:news:7o492a$l0k$1@nnrp1.deja.com>:
> '' Is there a way that I can trigger a file-upload without the direct
use
> '' of a file-field? I'm trying to write a GUI that won't be using
> '' standard submit buttons (will be using images), and a file-field
> '' automatically puts the standard browse button at the end of the
field.
>
> And your Perl question is?
>
> Abigail
> --
> Don't fight the web. Work with it.
>
> -----------== 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 ==-----
>
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 2 Aug 1999 14:57:14 -0400
From: jete@dgs.dgsys.com (Jete Software Inc.)
Subject: Question dealing with inlined my
Message-Id: <7o4pma$jo1@dgs.dgsys.com>
This system currently has Search Server running with the name 'search' in it.
Using the following code:
my($stat)
$stat = `ps -ef | grep search`;
produces this:
DB<1> p $stat
ituser 25802 1404 0 Jul 30 ? 1:07 /PublishingXpert/2.2/bin/psadmin/searchsrv
ituser 10405 10404 0 14:52:33 pts/9 0:00 sh -c ps -ef | grep search
ituser 10406 10405 0 14:52:33 pts/9 0:00 grep search
While this code using an inlined my:
my($stat) = `ps -ef | grep search`;
only produces this:
DB<1> p $stat
ituser 25802 1404 0 Jul 30 ? 1:07 /share/trea_www/PubX/be/PublishingXpert/2.2/bin/psadmin/searchsrv
Why is there a difference between the two outputs?? I want to be sure that my code
isn't now laced with bugs.
-- Norman
------------------------------
Date: Mon, 2 Aug 1999 12:05:14 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: RegExp: Searching all items of an array
Message-Id: <x3yaesanp6u.fsf@tigre.matrox.com>
marcza@my-deja.com writes:
> I want to find out if in column 2 to 6 of each array item
> the text "date" is written.
> The array has say 8 items.
> I want to do that without a loop.
> The following doesn't work:
>
> if (substr($array[[0-7]],3,4) =~ /date/) { ... }
>
> But I feel that it should work somehow.
Why? what do the docs say about substr() ?
> Can anyone help ?
Something like this should do it:
if (grep { /date/ } @array[2..6]) {
...
}
HTH,
Ala
------------------------------
Date: 02 Aug 1999 12:46:23 -0400
From: Jason Reed <jcreed@cyclone.jprc.com>
Subject: Re: why are you so harsh to this guy ?
Message-Id: <a1d7x6ruzk.fsf@cyclone.jprc.com>
Jeff Kerrigan <jeff_kerrigan@hotmail.com> writes:
> Get a life. If you were half as great as you thought you were, Tad,
> you wouldn't have time
> to give 25,000 word responses to every "newbie" who writes to this NG.
>
> Tad McClellan wrote:
*massive snip*
> > Fort Worth, Texas
Yeah, the only way someone could top such a clear act of stupidity as
a well-reasoned defense of one's actions would be to, like, quote the
whole damn thing.
*Below* a two-line non sequitur.
---Jason
------------------------------
Date: Mon, 2 Aug 1999 12:12:04 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: why are you so harsh to this guy ?
Message-Id: <x3y907unovf.fsf@tigre.matrox.com>
Thomas Schmickl <schmickl@magnet.at> writes:
> Well, thats an answer, but I wonder how one can remember one of
> thousand posters
> in this ng, that he is too often asking silly questions. But maybe you have
> an better overlook over this group.
You can check the posting history of everybody. Go to deja.com and see
for yourself.
------------------------------
Date: Mon, 2 Aug 1999 19:11:57 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: why are you so harsh to this guy ?
Message-Id: <Pine.HPP.3.95a.990802190811.3783H-100000@hpplus03.cern.ch>
On Mon, 2 Aug 1999, Jeff Kerrigan put Tad McClellan in Jeopardy with:
> Get a life.
>
> Tad McClellan wrote:
Welcome to the killfiles of the denizens of clpm.
------------------------------
Date: 2 Aug 1999 18:16:57 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: why are you so harsh to this guy ?
Message-Id: <slrn7qbo8v.q33.fl_aggie@thepentagon.com>
On Mon, 02 Aug 1999 09:20:17 -0700, Jeff Kerrigan
<jeff_kerrigan@hotmail.com>, in <37A5C540.CD619A7A@hotmail.com> wrote:
[note: re-wrapped, using a *real* editor can be such a joy]
+ Get a life.
And you had to repost every bit Tad wrote? must have been pretty good
stuff if you kept it.
+ If you were half as great as you thought you were, Tad,
+ you wouldn't have time to give 25,000 word responses to every "newbie"
+ who writes to this NG.
The great thing about being a perl programmer is that using perl gives
you time to waste on 25,000 word thesi (theses?) to newbies explaining
the error of their ways, if you choose to do so.
$laziness = 'virtue';
James
------------------------------
Date: Mon, 02 Aug 1999 13:22:36 -0500
From: Tom Briles <sariq@texas.net>
Subject: Re: why are you so harsh to this guy ?
Message-Id: <37A5E1EC.3D89948E@texas.net>
Jeff Kerrigan wrote:
>
> Get a life. If you were half as great as you thought you were, Tad, you wouldn't have time
> to give 25,000 word responses to every "newbie" who writes to this NG.
>
If you *ever* need a reliable answer to a Perl question from this forum,
you just lost all hope...
<the sound of a myriad *plonk*s from the know-somethings>
- Tom
------------------------------
Date: Mon, 2 Aug 1999 11:23:36 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Why won't this little script work?
Message-Id: <x3ybtcqnr47.fsf@tigre.matrox.com>
Tim <bie@connect.ab.ca> writes:
> Sorry about the attachments, & I mean it doesn't work because I get a
> Internal Server Error. I don't know why I get that though (or else I;'d
> fix it)
What happens if you stick a '-w' after your shebang (first line), and
you make your second line look like 'use strict;'?
What happens when you run the script from the command line?
------------------------------
Date: 2 Aug 1999 18:19:10 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: working with = sign in a directory name - please help!
Message-Id: <slrn7qbod3.q33.fl_aggie@thepentagon.com>
On Mon, 2 Aug 1999 08:01:38 -0500, Timothy J Flynn <tflynn@iastate.edu>, in
<7o44rp$ji1$1@news.iastate.edu> wrote:
+ I have tried just about every way of escaping for this with little
+ success.
Code snippet, please? just enough to demonstrate the problem you're
having. Sorry, I don't have the 'use ESP;' module installed.
James
------------------------------
Date: Mon, 2 Aug 1999 13:49:47 -0500
From: "Timothy J Flynn" <tflynn@iastate.edu>
Subject: Re: working with = sign in a directory name - please help!
Message-Id: <7o4p8d$jar$1@news.iastate.edu>
$filein="somefilename";
ok, so my previous attempts were used with something like this..
$filedest="/usr/local/something/=history/file";
as well as...
$filedest="/usr/local/something/\=history/file";
and..
$filedest="/usr/local/something/" . "=history" . "/file";
and..
$filedest="/usr/local/something/" . "=" . "history/file";
etc... with a hopeful result of ..
rename($filein, $filedest);
Sorry I forgot about the esp.. :) any ideas?
-Tim
I R A Darth Aggie <fl_aggie@thepentagon.com> wrote in message
news:slrn7qbod3.q33.fl_aggie@thepentagon.com...
> On Mon, 2 Aug 1999 08:01:38 -0500, Timothy J Flynn <tflynn@iastate.edu>,
in
> <7o44rp$ji1$1@news.iastate.edu> wrote:
>
> + I have tried just about every way of escaping for this with little
> + success.
>
> Code snippet, please? just enough to demonstrate the problem you're
> having. Sorry, I don't have the 'use ESP;' module installed.
>
> James
------------------------------
Date: 2 Aug 1999 18:21:12 GMT
From: fl_aggie@thepentagon.com (I R A Darth Aggie)
Subject: Re: Y2K in Washington (Was: Re: print "Location: http://..." avec =?iso-8859-1?Q?param=E8tres=29?=
Message-Id: <slrn7qbogt.q33.fl_aggie@thepentagon.com>
On Mon, 2 Aug 1999 08:17:49 -0700, Larry Rosler <lr@hpl.hp.com>, in
<MPG.120f5669fab8d567989d95@nntp.hpl.hp.com> wrote:
+ Quoted in this morning's San Francisco Chronicle:
+ The Washington Post quotes Senate Banking Committee Chairman Phil Gramm,
+ R-Texas, at a hearing last week: "Well, it seems to me we ought to be
+ encouraged that in the year 1000, they had to add a new digit, and yet
+ no evidence of economic disruption. And then a millennium before, we
+ had dates going down, and then they started going up, and yet no evidnce
+ of disruption of chaos in the economy. So if they could do it then,
+ surely we can deal with it now, it seems to me."
Dumn aggee.
James - Phil, not Larry...
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
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.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 V9 Issue 336
*************************************
