[13480] in Perl-Users-Digest
Perl-Users Digest, Issue: 890 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Sep 23 15:07:29 1999
Date: Thu, 23 Sep 1999 12:05:16 -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: <938113516-v9-i890@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 23 Sep 1999 Volume: 9 Number: 890
Today's topics:
Re: ./ -- why? (Alan Curry)
ANNOUNCEMENT: Boulder.pm is organizing (Walter Pienciak)
Re: applications of perl ?? <mark_jarvis@net.com>
Re: applications of perl ?? <emschwar@rmi.net>
Re: beauty of a Y2K bug <cassell@mail.cor.epa.gov>
Re: beauty of a Y2K bug <cassell@mail.cor.epa.gov>
combination sn0brdr@yahoo.com
Re: confusing localtime <t.dillerNOovSPAM@xpres.com>
Re: Copying directories and subdirectories <cassell@mail.cor.epa.gov>
decomposing an outline-style text body (ugly regexp que <george.willman@2asc.com>
depreciated feature question aaronurbain@bigfoot.com
Re: get newest file in a dir and write this filename in <cassell@mail.cor.epa.gov>
Getting the first occurence of a string <tom.kralidis@ccrs.nrcanDOTgc.ca>
Re: Getting the first occurence of a string <t.dillerNOipSPAM@xpres.com>
Re: Grouping in REs, no doc found <ltl@rgsun5.viasystems.com>
Re: how to test if a file is a link? <t.dillerNOonSPAM@xpres.com>
Re: How to validate a URL? (Philip 'Yes, that's my address' Newton)
Re: HTML to ASCII <emschwar@rmi.net>
Re: HTML to ASCII <malcolm.dewjones@moh.hnet.bc.ca>
Re: New trolling strategy ? <cassell@mail.cor.epa.gov>
Re: PERL PROBLEM - ERROR 405 method not allowed <cassell@mail.cor.epa.gov>
Problems 'use'ing URI::URL and CGI in the same script mbarnicle@my-deja.com
Re: Send doubles over a network <cassell@mail.cor.epa.gov>
Re: split comp.lang.perl.misc ? <cassell@mail.cor.epa.gov>
Re: stripping newlines out of a string <spike_YYwhiteYY@YYdellYY.com>
Re: You should be admired, or What does this have to do <durbin@cig.mot.com>
Re: You should be admired <elaine@chaos.wustl.edu>
Re: You should be admired <emschwar@rmi.net>
Re: You should be admired (Henry Penninkilampi)
Re: You should be admired (Henry Penninkilampi)
Re: You should be admired <elaine@chaos.wustl.edu>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 23 Sep 1999 18:13:15 GMT
From: pacman@defiant.cqc.com (Alan Curry)
Subject: Re: ./ -- why?
Message-Id: <%4uG3.6455$QJ.376239@typ11.nn.bcandid.com>
In article <0XtG3.6412$QJ.374695@typ11.nn.bcandid.com>, I wrote:
[stuff]
<autolart>
Must *WHACK* trim *WHACK* own *WHACK* sig *WHACK* when *WHACK* superseding
</autolart>
<otherlart>
Must *WHACK* find *WHACK* news server *WHACK* that *WHACK* understands
*WHACK* superseding
</otherlart>
--
Alan Curry |Declaration of | _../\. ./\.._ ____. ____.
pacman@cqc.com|bigotries (should| [ | | ] / _> / _>
--------------+save some time): | \__/ \__/ \___: \___:
Linux,vim,trn,GPL,zsh,qmail,^H | "Screw you guys, I'm going home" -- Cartman
------------------------------
Date: Thu, 23 Sep 1999 18:10:39 GMT
From: walter@io.frii.com (Walter Pienciak)
Subject: ANNOUNCEMENT: Boulder.pm is organizing
Message-Id: <z2uG3.25$ffd.176670208@news.frii.net>
Boulder.pm is pleased to announce its new existence!
We're a new Perl Monger group -- in Boulder, Colorado -- and we're
currently planning our first meeting. If you're in the area and
are interested, either join our discussion list or stay tuned
for an announcement of the time/location for that meeting.
For further information, including how to subscribe to our
brand spankin' new e-mail discussion list, visit our website at
http://boulder.pm.org/
Walter
------------------------------
Date: Thu, 23 Sep 1999 12:58:20 +0000
From: Mark Jarvis <mark_jarvis@net.com>
Subject: Re: applications of perl ??
Message-Id: <37EA23EB.B60D75F1@net.com>
Seriously - Perl and vlsi design are kind of from different worlds.
Chances are, if Perl is being used with someone's vlsi design s/w,
it's probably unique to the tool. I mean, if you have to have a
scripting language to "extend" the vendor's tool, Perl is a fine
choice due to the large base of experience and knowledge of Perl
Out There. The AutoCad program uses Lisp, as I recall. Later
revisions allow nice "object orientation" in programming, too.
Admittedly, I'm probably not on the cutting edge of the uses
for Perl, but I've always thought it excelled as a tool for processing
and condensing large files of text into "just the facts". I believe
it started as a hybrid answer to csh, sh, sed, and awk scripting all
rolled into one.
-MJ
S Vishwanath wrote:
> can some body help me by elaborating the exact nature of use of perl
> (especially in vlsi design) .
>
> ~vishwanath
------------------------------
Date: 23 Sep 1999 12:17:43 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: applications of perl ??
Message-Id: <xkfu2olijaw.fsf@valdemar.col.hp.com>
S Vishwanath <vishx@mailcity.com> writes:
> can some body help me by elaborating the exact nature of use of perl
> (especially in vlsi design) .
Dunno 'bout the exact nature, but search DejaNews here-- somebody has
developed a layout application in Perl. I *think* it reads VHDL, but I
don't remember. Anyway, it's all in DejaNews.
Or hey, you could learn Perl, and write your own!
-=Eric
------------------------------
Date: Thu, 23 Sep 1999 11:22:56 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: beauty of a Y2K bug
Message-Id: <37EA7000.16A564CA@mail.cor.epa.gov>
Randal L. Schwartz wrote:
[snip of painfully-funny maldesigned code]
> And this stuff is all over. No telling how many scripts are available
> in those "free download" areas but not indexed by the spiders.
I think we'll be able to tell right around January 1 [or perhaps
Monday the 3rd], when all the users of those kludges come
crying to this ng for rescue. Maybe Jocelyn will keep count
for her next news article.
> I'd say anybody that chipped their CGI teeth on either Selena Sol or
> Matt Wright's stuff (both of which seem to do stuff like the above),
> and didn't eventually turn to the docs, is writing a lot of CRAP(tm)
> that will need correcting in less than 100 days.
>
> I know, it's not Perl's fault. Blame it on the web. :)
Blame It On Rio.
It won't matter. All the skriptkiddies will blame it on
Perl and this newsgroup.
Maybe we should get a new newsgroup created just for this
purpose. alt.perl.y2k.help And then we can just ignore
all posts to it and all posts crossposted to it.
> print substr "Just another Perl hacker, since 19$year", 0, 25;
heh.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 11:25:47 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: beauty of a Y2K bug
Message-Id: <37EA70AB.4F27427B@mail.cor.epa.gov>
Kragen Sitaker wrote:
[snip of plaint]
> I mean, yeah, if you have a hundred-foot-high catwalk without any
> handrails, you can walk across it every day for years without falling
> off, if you're careful. Anyone who falls off probably could have
> avoided falling, had they been more careful. But that doesn't mean
> you're not responsible for putting up handrails.
>
> C has a lot of missing handrails.
No no no, that's not it.
C is a language in which the creators have carefully *removed*
all the handrails, so experts can bungee-jump whenever they
want to. Anyone who goes *splat* shouldn't have tried it. :-)
David, who has gone *splat* more than once
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 18:20:55 GMT
From: sn0brdr@yahoo.com
Subject: combination
Message-Id: <7sdr1n$ibn$1@nnrp1.deja.com>
hi,
is there a module and doc for combination? if so, would you tell me
where i can get them?
i'm trying to get the most possible combination of elements from 3
arrays (not equal in size).
@one = qw(blue green yellow)
@two = qw(john nancy)
@three = qw(north south east west)
no repeat and order matters.
i am open for any (intellectual) suggestion if there is another away
of doing this.
tia,
r-e
another perl newbie
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 23 Sep 1999 11:04:28 -0700
From: Tim Diller <t.dillerNOovSPAM@xpres.com>
Subject: Re: confusing localtime
Message-Id: <03676caf.02763822@usw-ex0108-057.remarq.com>
Hi!
According to the ctime man pages, the month is returned as
a value from 0 to 11 indicating the current month.
Could it be that localtime doesn't add one to this value?
Tim
t.diller@xpres.com
* 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: Thu, 23 Sep 1999 11:06:47 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Copying directories and subdirectories
Message-Id: <37EA6C37.4E7ED658@mail.cor.epa.gov>
Brian wrote:
>
> I'm embarrassed to say that I remembered xcopy from my old dos days not
> long after I posted this. The only problem is that if the directory that you
> are creating doesn't exist, xcopy ask you if the directory you are creating
> is a file or directory... requiring user input. This doesn't do me any good
> because I need this Perl script to run standalone from an AT job. You don't
> happen to know how to get around this do you? I looked at all the switches
> for xcopy, but couldn't find anything. Also, I don't seem to have xcopy32 on
> my machine?
So you could check for the existence of the directory and create it
if missing. *Then* use xcopy. Or File::Find. Or whatever. But
make sure that AT knows where xcopy (as well as Perl) is.
Don't worry about the 'xcopy32' reference. Use xcopy. xcopy on
win32 will make the calls to xcopy32 for you.
HTH,
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 14:29:11 -0400
From: "George Willman" <george.willman@2asc.com>
Subject: decomposing an outline-style text body (ugly regexp question)
Message-Id: <7sdrht$ahh$1@winter.news.rcn.net>
I have a requirement to analyze/decompose large (400-500k'ish) existing
outline-style text documents as input and populate the results into a
database. I've got a LOT of data so honestly, I'll defer to your wisdom if
how I'm tackling the problem isn't the best way (but I love the comment to
the effect of 'If its done before your deadline, it works.').
What I -think- I would want to do is decompose the large text bodies by
reading them in (trivial), then stuff @paragraph with a repeating set of 3
items from each main heading number, the heading title and finally
everything else (subheadings, et al). The complicating factor to this
on-the-surface-cheap-trick-yet-now-humiliating-all-day-grievance is a hard
return (\n) at the end of each line. The potential saving grace is a
repeating identifying string ("Event:") in each main heading.
Here's a sample, and following it will be my 3 failed attempts and
ideas. \n's are explicitly noted since word wrapping is notoriously
variable across the net (what's so bad about green phosphor terms?? :) ).
Throw me a bone if you would, please.
<START OF $_>
1. Event: Foundation of Rome\n
A. blah blah....\n
blah Romulus.\n
B. yet more blah... Remulus\n
blah Wolf blah blah Rivers.\n
2. Event: Foundation of 3 River's Stadium\n
A. blah blah...Hoffa...blah\n
blah blah concrete.\n
B. blah... dirt nap.\n
C. you get the picture...\n
<END OF $_>
Ideally (well maybe not, suggestions are certainly welcome on any fronts),
@paragraph=(1,Foundation of Rome,A. blah *everything up to*
Rivers.,2,Foundation of 3 River's Stadium,A. blah *everything up to* nap.)
This assumes my next step would be to go into @paragraph and breakout
every 3rd element and hash/decompose IT further into (1.A, *contents of
1.A*, 1.B, etc). From here I'd be set to turn the beast loose on 1.5 gigs
of existing data (well, at least they kept good records), go to sleep and
let it populate mySQL.
Failed attempted 1:
@paragraphs=m/\n(\d)\. Event: (\w+)\n(.+)/mg;
Output: (1, Foundation of Rome, A. blah blah....) - stops at first \n
Failed attempted 2:
Similar m//gs;
Output: (1, Foundation of Rome, A. *everything until end of string*)
Failed attempted 3:
Get tricky and encapsulate Event line with unique identifiers (i.e., xXx1.
Event: Foundation of RomeXxX) then tr// out all \n's.
@paragraph=m/(?:xXx(\d)\. Event: (.+?)(?:XxX)(.+?))/gs)
Output: This fails horribly.
Thanks and have fun!
-GW
------------------------------
Date: Thu, 23 Sep 1999 18:25:01 GMT
From: aaronurbain@bigfoot.com
Subject: depreciated feature question
Message-Id: <7sdr9b$il1$1@nnrp1.deja.com>
my $a = 'xyz';
my $b = 'ABCD';
if ($a EQ $b)
{
print "equal";
}
else
{
print "snot equal";
}
gives me:
Use of EQ is deprecated at export.pl line 11 (#1)
(D) The construct indicated is no longer recommended for use,
generally because there's a better way to do it, and also because the
old way has bad side effects.
Can someone offer the recommended way to compare two strings?
-A
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 23 Sep 1999 11:16:58 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: get newest file in a dir and write this filename in a file
Message-Id: <37EA6E9A.D3C7197E@mail.cor.epa.gov>
Pino Calzo wrote:
[snip of Alex's response]
> now, the output should be put in a variable for later use. i need to
> write the filename into a second file (actually scan the file and
> replace the current .aml file with the newest one.
Excuse me, but this sounds embarrassingly like you wanted
someone else to write all your code for you. Surely that
can't be the case. You're writing .aml files [in ARC/INFO
perhaps?], so surely you are willing to learn just enough
sh or Perl to complete this task.. or to pay some consultant
to do so...
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 14:43:04 -0400
From: Tom Kralidis <tom.kralidis@ccrs.nrcanDOTgc.ca>
Subject: Getting the first occurence of a string
Message-Id: <37EA74B8.75364A40@ccrs.nrcanDOTgc.ca>
How does one get the first occurence of a string which occurs many times
in a file?
eg. I have a text file with many fields looking like:
STATIM 101 18 55 33333.2
STATIM 101 18 55 32457.4
STATIM 101 18 55 12349.3
How does one capture the first occurence (ie. STATIM 101 18 55
33333.2). What I have so far only returns the last occurence:
while(<>)
{
$string = $1 if (/^STATIM(.*)$/);
}
I'm trying to manipulate numbers associated with the common strings, at
specific points in the file (eg. the Nth occurence.
Any ideas?
Thanks alot
..Tom
--
-----------------------------------------------------------------------------------------
Tom Kralidis Geo-Spatial Technologist
Canada Centre for Remote Sensing Tel: (613) 947-1828
588 Booth Street , Room 241 Fax: (613) 947-1408
Ottawa , Ontario K1A 0Y7 http://www.ccrs.nrcan.gc.ca
-----------------------------------------------------------------------------------------
------------------------------
Date: Thu, 23 Sep 1999 11:56:14 -0700
From: Tim Diller <t.dillerNOipSPAM@xpres.com>
Subject: Re: Getting the first occurence of a string
Message-Id: <2a1814d4.0ff616ea@usw-ex0108-057.remarq.com>
Hi!
By using last and a counter.
Your code:
while(<>) {
$string = $1 if (/^STATIM(.*)$/); }
New code:
$occurance_i_want = 4;
$occurance_counter=0;
while(<>) {
if(/^STATIM(.*)$/) {
$string = $1;
$occurance_counter++;
if($occurance_counter = $occurance_i_want) {
last;
}
}
}
..do whatever
Tim Diller
t.diller@xpres.com
* 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: 23 Sep 1999 18:19:49 GMT
From: lt lindley <ltl@rgsun5.viasystems.com>
Subject: Re: Grouping in REs, no doc found
Message-Id: <7sdr05$6bt$1@rguxd.viasystems.com>
Kragen Sitaker <kragen@dnaco.net> wrote:
:>In article <37EA4B3B.8517D624@ife.ee.ethz.ch>,
:>Alex Rhomberg <rhomberg@ife.ee.ethz.ch> wrote:
:>>lt lindley wrote:
:>>> :>I didn't find info about what happens when a group is followed by a
:>>> :>quantifier *?+{}
:>>>
:>>> That is silly. There is a huge amount of info about this subject in
:>>> perlre. You just haven't read it carefully enough.
:>>
:>>Can you point me to it? I'm sorry, I again didn't find it.
:>Actually, I never did figure it out either.
:>(BTW: perldoc perlre's explanation of /m erroneously claims that
:>without /m, $ matches only at the end of the string. It actually will
:>match before a newline if the newline is the last character of the
:>string.)
$_ = "cat\n"
/t$/ # matches
/\n$/ # also matches
It does what you mean, regardless of what you say. I think you can
forgive Tom for not cluttering the second paragraph of perlre with
more information than most readers will be ready for at that point.
:>I just read all of perldoc perlre, including the parts about creating
:>overloaded constants and so forth, and as far as I can tell, nowhere
:>does it mention what happens if a subexpression inside capturing
:>parentheses matches more than once during a successful match attempt.
:>It would be reasonable to think that it left the first match, the last
:>match, or a concatenation of all matches in $2 or whatever.
It is apparent that I did not understand the original question.
Kragen clarified it. I recant the word "silly".
Perhaps it is not obvious from reading perlre after all, but it makes
sense to me.
It keeps trying out the subpattern to see if it still matches from
left to right and it keeps going until it fails (greedy). In the
absence of more pattern forcing it to backtrack, the backreference
will be the last one it tried before completing the final match.
perl -e '$_=654321;@x=/((\d)*)/;print "@x"'
654321 1
If it backtracks, then it unrolls that scope and leaves the last
successful one. In the following case (\d)* matched 654321 and 1 was
in $2. Then it backtracked to make the rest of the re match and 2
was left in $2.
perl -e '$_=654321;@x=/((\d)*1)/;print "@x"'
654321 2
I'm ambivalent about whether perlre really describes this or not.
[snip]
:>#!/usr/bin/perl -w
:>use strict;
:>my $string = 'How old is your CAT?';
:>$string =~ /(CAT)/; # succeeds
:>$string =~ /(flibberti-gibbet)/; # fails
:>print "$1\n"; # prints CAT
:>The sad truth is that it leaves the value unchanged if the subpattern
:>didn't match, or if it matched only as part of an unsuccessful pattern
:>match.
You are confusing "subpattern not matching" with "next regexp evaluation
not matching". They are 2 different events.
$string =~ /(old).*(CAT)/
# $1 is old and $2 is CAT
$string =~ /((giberish)*CAT)/;
# $1 is CAT and $2 is undef
The subpattern 'giberish' is not matched, but the full regexp does match
so $2 is reset to undef and $1 is CAT.
If you write it like this:
((?:something)+)
instead of like this:
((something)+)
it is a lot easier to understand.
Or else put in some really good comments. :-)
Though I think I can see where there would be times when you really want
to know what was the last one matched in a grouped repeat.
--
// Lee.Lindley /// Programmer shortage? What programmer shortage?
// @bigfoot.com /// Only *cheap* programmers are in short supply.
//////////////////// 50 cent beers are in short supply too.
------------------------------
Date: Thu, 23 Sep 1999 11:23:51 -0700
From: Tim Diller <t.dillerNOonSPAM@xpres.com>
Subject: Re: how to test if a file is a link?
Message-Id: <02562dce.07843f71@usw-ex0108-057.remarq.com>
Hi!
According to O'Rilley Programming Perl, page 203
readlink EXRP
attempts to return the name of the file pointed to by a
symbolic link. If EXPR is not a symbolic link it returns
an undefined value.
I've tested this and the return value is not undef only for
symbolic links. Use the function defined to tell.
Tim Diller
t.diller@xpres.com
* 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: Thu, 23 Sep 1999 18:07:37 GMT
From: nospam.newton@gmx.net (Philip 'Yes, that's my address' Newton)
Subject: Re: How to validate a URL?
Message-Id: <37ea6a24.347956046@news.nikoma.de>
On Thu, 23 Sep 1999 08:58:55 -0700, Tom Phoenix <rootbeer@redcat.com>
wrote:
>Have you written to Fred and Barney yet? Try it and see for yourself!
>
> <"fred and barney"(.@.&?<b>valid!</b>.@,,)@redcat.com>
I can't. Neither Pegasus nor Free Agent will let me.
fred&barney@stonehenge.com (IIRC) is fine, but Fred and Barney at
redcat is too much for them.
Cheers,
Philip
--
Philip Newton <nospam.newton@gmx.net>
------------------------------
Date: 23 Sep 1999 12:19:13 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: HTML to ASCII
Message-Id: <xkfr9jpij8e.fsf@valdemar.col.hp.com>
Cyrille <cyrille@ktaland.com> writes:
> I want to converte HTML to ASCII,
Either use HTML::Parser (which, as Abigail is ready to point out, doesn't
actually parse HTML-- it comes close, though), or use one of the SGML
parsers with the appropriate HTML DTD.
-=Eric
------------------------------
Date: Thu, 23 Sep 1999 11:08:26 -0700
From: Malcolm Dew-Jones <malcolm.dewjones@moh.hnet.bc.ca>
Subject: Re: HTML to ASCII
Message-Id: <37EA6C9A.14CE6BFC@moh.hnet.bc.ca>
Not perl, nor perfect but -
lynx -dump (?)
I forget the option, so it may not be -dump, but lynx has various useful
options, and one of them will save its displayed output in a file. It
can even provide a list of "footnotes" which are the URLs seen in the
document.
Lynx doesn't render tables very well, but at least the data is there.
Cyrille wrote:
>
> Hi,
> I want to converte HTML to ASCII,
>
> but modules :
> use HTML::FormatText ;
> use HTML::Parse;
>
> doesn't parse TABLE !
>
> Is there a another way ? Another module or script ?
>
> Thanx,
> Cyrille.
------------------------------
Date: Thu, 23 Sep 1999 11:27:52 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: New trolling strategy ?
Message-Id: <37EA7128.D08C1540@mail.cor.epa.gov>
c_j_marshall@hotmail.com wrote:
>
> I've just been wondering (after reading some of the recent posts to this
> newsgroup) whether the 12 year old children who plague most newsgroups
> with rubbish have just learned a new strategy to wind us all up - namely
> by posting sensible looking, yet consistantly off topic, mails.
Having received stealth e-mails from some of those posters,
all I can say is "I wish."
A relevant quote:
"Don't attribute malevolence to that which is explainable
by mere incompetence."
Words to live by. :-)
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 11:10:45 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: PERL PROBLEM - ERROR 405 method not allowed
Message-Id: <37EA6D25.20EC9023@mail.cor.epa.gov>
CyberMart wrote:
>
> i all,
owdy.
You know, sending three different help requests with three
different titles is liekly to get you killfiled instead of
assisted. Please don't do this in future.
> How to configure PERL in the NT registry as I getting an error message
> "HTTP ERROR 405
[big snip]
Information on webserver config is in the ActivePerl FAQ
which is sitting on your hard drive where you installed
ActiveState Perl [not 'PERL']. If that is not sufficient,
then you'll want to ask this sort of question in a newsgroup
about webservers or about your specific webserver.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 18:14:02 GMT
From: mbarnicle@my-deja.com
Subject: Problems 'use'ing URI::URL and CGI in the same script
Message-Id: <7sdqkt$hue$1@nnrp1.deja.com>
Hiya,
I'm having trouble with the following code:
#!/bin/perl
use URI::URL;
use CGI qw(:standard :escape :unescape);
print header;
print "Hello, World!<br>\n";
When I execute it, I get the following error:
Prototype mismatch: sub main::url ($;$) vs none
at /usr/local/lib/perl5/CGI.pm line 205.
Has anyone seen this before? Is there some way to get around this? I
would really like to be able to use URI::URL and CGI in the same
script, if possible. Thanks,
- Matt Barnicle,
mbarnicle@email.com
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 23 Sep 1999 11:14:01 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Send doubles over a network
Message-Id: <37EA6DE9.CC3B7015@mail.cor.epa.gov>
Alex Rhomberg wrote:
[snip]
> PPS: What is the politically correct way to say little indian?
> "vertically challenged american natives"? or "little endian"? ;-)
I prefer 'Orthodox Lilliputian', since that was the name
they chose for themselves. Who are we to choose arbitrary
labels based on our own cultures? :-)
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 11:31:28 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: split comp.lang.perl.misc ?
Message-Id: <37EA7200.9E70AF4A@mail.cor.epa.gov>
David Salvador Flores wrote:
>
> In article <37DE0ADC.A8C09BE0@hl.siemens.de>,
> Michel Combes <michel.combes@hl.siemens.de> wrote:
> >Can we split comp.lang.perl.misc
> >to have a clear separation of the Perl articles related to Web/CGI stuff
> You're gonna have to call it something like"
>
> comp.lang.perl.not-cgi
comp.lang.perl.misc-but-not-cgi-and-I-really-mean-it-you-turkey
Or else just forward all those CGI questions to mrbog@deja.com
since he's so cretin^H^H^H^H^H^H certain that they should be
answered. :-)
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Thu, 23 Sep 1999 13:11:38 -0500
From: "Spike White" <spike_YYwhiteYY@YYdellYY.com>
Subject: Re: stripping newlines out of a string
Message-Id: <7sdq93$onh$1@galaxy.us.dell.com>
$mystring =~ s/\n//g;
Quinn Coldiron wrote in message <37E84332.87D6A2E9@thetoolhouse.com>...
>I'm on RedHat 6.0 and am trying to write a Perl script that will strip
>the newline character out of a string. Any help?
>
>Quinn
>
>
>
------------------------------
Date: Thu, 23 Sep 1999 12:54:00 -0500
From: "Chris Durbin [C]" <durbin@cig.mot.com>
Subject: Re: You should be admired, or What does this have to do with Perl?
Message-Id: <37EA6938.27BB@cig.mot.com>
Kragen Sitaker wrote:
>
> In article <spamfree-2309991606340001@d6.metropolis.net.au>,
> Henry Penninkilampi <spamfree@metropolis.net.au> wrote:
> >Tell me, Abigail, how does a petulant child gain respect in life? I'm
> >wondering if you know - you seem to be an authority on the subject.
>
> Abigail won *my* respect by
> - posting lots of correct answers
> - posting frightening JAPHs
> - answering even stupid questions
> - standing up for what is right.
>
> You have done none of these.
> --
> <kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
> Wed Sep 22 1999
> 47 days until the Internet stock bubble bursts on Monday, 1999-11-08.
> <URL:http://www.pobox.com/~kragen/bubble.html>
What I am losing respect for is this newsgroup. I came here to learn
and explore the language, to be a better programmer, and write better
code. What I now find myself faced with is monstrous amounts of
bickering and partisan in-fighting. Finding threads of incredible length
that seem to be about nothing more than a few various responses to
childish insults.
I have read some of Abigail's responses to posts, and I have found them
to be insultlingly condescending as a general rule. Absolutely correct,
but very condescending. She is not alone in this. An atmosphere of
exclusivity seems be bred in here, which is amazing, considering the
number of posts and posters in this group.
Instead of trying to prove how smart you are by tearing down someone
else, why don't you just simply print an answer. If you know the answer
to someone's question, just answer it. It doesn't have to be an
opportunity to score points by making them seem foolish, even if you
think the solution is ridiculously simple. If someone has posted that
question, it obviously stumped them to the point where they would turn
to you jackals for advice. You are not children, stop acting like them.
If you need take pot-shots at each other go ahead, but stop masking as
an authority on anything but stupidity. Take it somewhere else like
comp.lang.perl.useless.chatter or comp.lang.perl.pointless.insults
--
Chris Durbin Motorola, Cellular Infrastructure Group
-----------------------------------------------------------------------
Phone: (847)435-9558 Pager: 1-800-759-8888, #1268222
Fax: (847)632-4552 Email: durbin@cig.mot.com
------------------------------
Date: Thu, 23 Sep 1999 14:07:57 -0400
From: Elaine -HFB- Ashton <elaine@chaos.wustl.edu>
Subject: Re: You should be admired
Message-Id: <37EA6BA0.BD522A56@chaos.wustl.edu>
Henry Penninkilampi wrote:
> Is the ratio unusually lower for Perl than it is for other programming
> languages? Are there less women coding Perl than other programming
> languages?
Are there fewer women in Perl as opposed to the rest of technology? From
observation, yes though I haven't any statistical proof. Look around the
newsgroups, the conferences, Perl Monger meetings, in your own
workplace. We would seem to be a very scarce commodity even if only by
nickname. The question though is why.
> > Either way, I'm curious because of the way you worded it 'put her back
> > in her place' as this is generally a chauvenistic boast.
>
> I've been dealing with women in positions of authority for a long time,
> and my observation has been that they are much more capable and reasonable
> than their male equivalents - hence they need to be cut down to size less
> often.
Again, your idioms like 'cut down to size' make me wonder about just how
honest you are being with yourself, but I'll let it rest. I'm not
willing to make the leap that we are often more capable or reasonable [
especially on the latter ] but I do find it interesting that you mention
it.
> Hope that helps.
Thanks for indulging my curiosity.
e.
------------------------------
Date: 23 Sep 1999 12:05:20 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: You should be admired
Message-Id: <xkfwvthijvj.fsf@valdemar.col.hp.com>
spamfree@metropolis.net.au (Henry Penninkilampi) writes:
> I remember being sent a "Welcome" message when I first posted to this
> group ages ago (was it this group?) which must have been sent by a script
> which scans the group for articles from new email addresses. If you think
> it is important that folks read the "How to find the right place to post
> (FAQ)", why don't we tweak that script to send out the FAQ as well? That
> way you can be sure that the FAQ has been shoved in front of every new
> posters face at least once, and then they no longer have any excuses...
Perhaps because the FAQ is already included with the standard Perl
documentation-- the very same documentation which is itself included with
every Perl distribution for the last couple of years? If you've got
Perl, you've got the FAQ. Contrariwise, if you don't have the FAQ, you
don't have Perl.
Besides which, have you looked at the FAQ lately? It's bloody huge.
While that makes it a kickass reference that people ought to consult
before posting (dammit), it also makes it impractical to email to
everyone-- especially since they should already have it.
-=Eric
------------------------------
Date: Fri, 24 Sep 1999 03:39:09 +0930
From: spamfree@metropolis.net.au (Henry Penninkilampi)
Subject: Re: You should be admired
Message-Id: <spamfree-2409990339100001@d6.metropolis.net.au>
In article <gKrG3.5894$QJ.356926@typ11.nn.bcandid.com>, kragen@dnaco.net
(Kragen Sitaker) wrote:
> >I responded by isolating her behavioural problem and delivered
> >it to her on the end of a sharp tongue. That had the desired
> >effect - it shut her up and put her back in her place (for now).
>
> I doubt it. I think it more likely that he decided to ignore you.
I don't care if she ignores me or not, so long as she stops brawling in
public. (Apparently I've been kill-filed - that's what the *plonk* was
all about.)
> >I don't like having to do that, and I've *never* done it in this forum
> >before, but I thought enough damage was being done _to_the_group_ to
> >warrant an intervention - so I did.
>
> Done to the group? Who are you, anyway, to say what is good for the
> group and what is not?
I'm no-one important, but I *am* a member of the 'community' - and in the
absence of official direction to the contrary, I'll defend it in the best
way I know how.
> You don't even know Abigail's a man.
What's that got to do with it? You could be a ferret for all I care.
> >And now *you're* trying to have a go at me for 'standing up for what is
> >right'???
>
> No, for attacking Abigail for standing up for what is right. Not that
> he needs any defense from me.
Ah, so you approve of *her* tactics, but you *don't* approve of mine?
Even though we both subscribe to the same charter? That's fine. We all
have our own preferred styles of 'law enforcement' and if you prefer her's
over mine, then so be it. I'm cool with that.
> >Your Honour has been served - you came to the defence of your friend.
>
> I don't know Abigail well; I've never met him in person. I wouldn't
> presume to call him my friend. In fact, sometimes I think he's
> annoying, as I'm sure everyone here does. But I think he was in the
> right.
Bully for you! (I think that's the way the Brits say it?)
Since this is an issue of 'style', there is no right and wrong. It all
comes down to personal preference. Thus there is no point arguing about
it. So I won't.
Henry.
------------------------------
Date: Fri, 24 Sep 1999 03:44:31 +0930
From: spamfree@metropolis.net.au (Henry Penninkilampi)
Subject: Re: You should be admired
Message-Id: <spamfree-2409990344310001@d6.metropolis.net.au>
In article <37ea45c1_1@newsread3.dircon.co.uk>, Jonathan Stowe
<gellyfish@gellyfish.com> wrote:
> > I responded by
> > isolating her behavioural problem and delivered it to her on the end of a
> > sharp tongue. That had the desired effect - it shut her up and put her
> > back in her place (for now).
>
> As I said just another barrack room social worker ...
Yeah, I was curious about that the first time around. What exactly is a
barrack room social worker?
Obviously you are trying to insult me, but that's kinda hard because I
don't know what your talking about!
Please, educate me on this matter so your insults can be more effective!
(No point in wasting a perfectly good insult, now is there?)
:^)
Henry.
------------------------------
Date: Thu, 23 Sep 1999 14:44:12 -0400
From: Elaine -HFB- Ashton <elaine@chaos.wustl.edu>
Subject: Re: You should be admired
Message-Id: <37EA741D.B02021D4@chaos.wustl.edu>
Henry Penninkilampi wrote:
> What's that got to do with it? You could be a ferret for all I care.
LOL :) Indeed so.
> Ah, so you approve of *her* tactics, but you *don't* approve of mine?
It is like any dysfunctional family...grab your fork and defend your
dinner.
> Bully for you! (I think that's the way the Brits say it?)
More like "Right then, carry on." Yanks only think they say "Bully" :)
e.
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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 V9 Issue 890
*************************************
