[13016] in Perl-Users-Digest
Perl-Users Digest, Issue: 426 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 9 02:07:20 1999
Date: Sun, 8 Aug 1999 23:05:09 -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 Sun, 8 Aug 1999 Volume: 9 Number: 426
Today's topics:
Re: a time to kill (Damian Conway)
Re: CGI Perl Properties <uri@sysarch.com>
Re: CGI Perl Properties (Abigail)
Re: CGI Perl Properties <uri@sysarch.com>
Re: CGI Perl Properties (Larry Rosler)
Re: Does this make sense to anyone? (Ronald J Kimball)
Re: I guess this is a Misc question: Cgi-bin (David H. Adler)
Re: LWP <newsgroups@justinfashanu.demon.co.uk>
missing attachment "registry.txt" (was: ASP_ActiveState <wrtl.brmpft@t-online.de>
Re: Nastiness contrary to the spirit of perl? (Matt)
Re: Nastiness contrary to the spirit of perl? (Matt)
Re: Need help with Perl expression and replace <rootbeer@redcat.com>
Re: Need help with Perl expression and replace (Abigail)
Re: Net::Whois works under Win32? <srt@xnet.com>
Re: Web Perl <uri@sysarch.com>
Re: Web Perl (Larry Rosler)
Re: Where to find help other than perldoc and books. <uri@sysarch.com>
Re: Where to find help other than perldoc and books. (Larry Rosler)
Re: Where to find help other than perldoc and books. (Abigail)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 9 Aug 1999 04:07:18 GMT
From: damian@cs.monash.edu.au (Damian Conway)
Subject: Re: a time to kill
Message-Id: <7olk5m$7no$1@towncrier.cc.monash.edu.au>
damian@cs.monash.edu.au (Damian Conway) writes:
> 'Bout topics of the ancient past
> And those contemporaneous
> He weaves with equal souciance
> Quadrains extemporaneous.
^
t, goddamit!
Damian
PS: Supplying my own spelling flames now.
I gotta get a life, man!
------------------------------
Date: 09 Aug 1999 00:42:53 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: CGI Perl Properties
Message-Id: <x7u2q9ef8y.fsf@home.sysarch.com>
>>>>> "A" == Abigail <abigail@delanet.com> writes:
A> * Regular Perl does not have build in ashtrays.
A> CGI Perl has an ashtray at every chair, even if you don't smoke.
i acquired from a bar during a perl monger meeting, a glass ashtray with
an etched camel in the bottom (camel cigarette brand of course). i don't
smoke but it was worth getting.
A> * Regular Perl uses real leather.
A> CGI Perl uses imitation leather.
naugahyde to be specific
A> * Regular Perl uses Camels, Rams and Llamas.
oh my!
A> * Regular Perl is available in small and large sizes.
i though it used only one memory model on winblows these days.
A> * Regular Perl tasts like Coke.
A> CGI Perl tasts like Pepsi.
i hate all colas. i like root beer much better. does that mean i hate perl?
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: 9 Aug 1999 00:13:46 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: CGI Perl Properties
Message-Id: <slrn7qsors.9fk.abigail@alexandra.delanet.com>
Uri Guttman (uri@sysarch.com) wrote on MMCLXIX September MCMXCIII in
<URL:news:x7u2q9ef8y.fsf@home.sysarch.com>:
$$
$$ A> * Regular Perl tasts like Coke.
$$ A> CGI Perl tasts like Pepsi.
$$
$$ i hate all colas. i like root beer much better. does that mean i hate perl?
You should use TCL then.
Abigail
--
sub camel (^#87=i@J&&&#]u'^^s]#'#={123{#}7890t[0.9]9@+*`"'***}A&&&}n2o}00}t324i;
h[{e **###{r{+P={**{e^^^#'#i@{r'^=^{l+{#}H***i[0.9]&@a5`"':&^;&^,*&^$43##@@####;
c}^^^&&&k}&&&}#=e*****[]}'r####'`=437*{#};::'1[0.9]2@43`"'*#==[[.{{],,,1278@#@);
print+((($llama=prototype'camel')=~y|+{#}$=^*&[0-9]i@:;`"',.| |d)&&$llama."\n");
-----------== 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 ==-----
------------------------------
Date: 09 Aug 1999 01:53:51 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: CGI Perl Properties
Message-Id: <x7iu6pebyo.fsf@home.sysarch.com>
>>>>> "A" == Abigail <abigail@delanet.com> writes:
A> Uri Guttman (uri@sysarch.com) wrote on MMCLXIX September MCMXCIII in
A> <URL:news:x7u2q9ef8y.fsf@home.sysarch.com>:
A> $$
A> $$ A> * Regular Perl tasts like Coke.
A> $$ A> CGI Perl tasts like Pepsi.
A> $$
A> $$ i hate all colas. i like root beer much better. does that mean i hate perl?
A> You should use TCL then.
does that stand for 'the cola language'?
if so, i will not (ab)use it.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: Sun, 8 Aug 1999 22:54:47 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: CGI Perl Properties
Message-Id: <MPG.12180cfd4aaf245a989e0d@nntp.hpl.hp.com>
In article <x7u2q9ef8y.fsf@home.sysarch.com> on 09 Aug 1999 00:42:53 -
0400, Uri Guttman <uri@sysarch.com> says...
> >>>>> "A" == Abigail <abigail@delanet.com> writes:
>
...
> A> * Regular Perl uses Camels, Rams and Llamas.
>
> oh my!
It actually scans better in the proper pedagogic order:
Llamas, Camels and Rams
Oh my!
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 9 Aug 1999 01:47:46 -0400
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Does this make sense to anyone?
Message-Id: <1dw8xwm.1pcdbnw16l5bcsN@[209.61.79.61]>
Sean McAfee <mcafee@waits.facilities.med.umich.edu> wrote:
> > perl -e '$a = \@b; push @{ $a }, "foo", "bar"; print "@b\n"'
> foo bar
>
> > perl -e '$a = \@b; push @{ do { $a } }, "foo", "bar"; print "@b\n"'
> Type of arg 1 to push must be array (not hash slice) at -e line 1,
> near ""bar";"
> Execution of -e aborted due to compilation errors.
>
> Replacing "do" with "+do" fixes the problem, but I don't see a hash slice
> anywhere in this code. Could this be a parsing bug?
You're not looking hard enough.
%do = qw(This is a hash);
@do{$a} = 'This is a hash slice';
@{do{$a}} = 'This is also a hash slice';
--
_ / ' _ / - aka -
( /)//)//)(//)/( Ronald J Kimball rjk@linguist.dartmouth.edu
/ http://www.tiac.net/users/chipmunk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 9 Aug 1999 05:31:51 GMT
From: dha@panix7.panix.com (David H. Adler)
Subject: Re: I guess this is a Misc question: Cgi-bin
Message-Id: <slrn7qspu6.6hr.dha@panix7.panix.com>
In article <37ae2437.0@news2.cluster1.telinco.net>, Ben Quick wrote:
>Fair points,
First, I'd like to thank you for considering my points in the
reasonable way they were intended. Many do not on usenet, and I do
appreciate it.
>but wouldn't it have been easier if I was given polite responses like
>"I'm sorry, I don't know the answer. But ou're in the wrong group
>really, try asking in...." or "The answer is.... but really this is
>the wrong group. In future for this type of question try asking
>in...."
Perhaps. The problem is, this issue comes up *constantly* here -
people are tired of having to do this, especially as, as I pointed out
in my previous post, usenet etiquette asks that you look at documents
that specifically tell you not to come here with off-topic questions,
and tells you several ways in which you can be off-topic.
This is meant, of course, as an observation, rather than a flame. :-)
best, dha
--
David H. Adler - <dha@panix.com> - http://www.panix.com/~dha/
The perversity of the Universe tends towards a maximum.
------------------------------
Date: Mon, 9 Aug 1999 06:26:52 +0100
From: "Rob Sedgwick" <newsgroups@justinfashanu.demon.co.uk>
Subject: Re: LWP
Message-Id: <934176444.9598.0.nnrp-10.d4e4e97b@news.demon.co.uk>
QuestionExchange <USENET@questionexchange.com> wrote in message
news:237qx@questionexchange.com...
> The question is unclear.
>
> What's the second library you're loioking for?
> What do you mean by 'provide'? Do you look where to download libraries
from or do you look for a free web host that will let you *use* perl CGI
csripts on their site?
>
> If you're just looking for the place to download LWP, you can get it from
http://www.linpro.no/lwp/
>
> If you need anything else perl-related, chances are you will find it at
CPAN (Comprehensive Perl Archive Network) site http://www.cpan.org
>
> There is CPAN search engine:
> http://theory.uwinnipeg.ca/search/cpan-search.html
>
I am not looking where to download the libraries from. My understanding is
that the libraries have to be compiled on the machine on which they are
present, i.e. I can't just stick them in mt CGI-BIN directory and they will
work. Is this correct? There are several web hosts that I know of who allow
you to use perl CGI scripts.
Rob
--
E-mail: rsedgwick@justinfashanu.demon.co.uk
Homepage: http://www.justinfashanu.demon.co.uk
Cockatiel Genetics: http://only.at/cockatiels
------------------------------
Date: Sun, 08 Aug 1999 18:00:42 +0200
From: Wrtl Brmpft <wrtl.brmpft@t-online.de>
To: Wrtl Brmpft <wrtl.brmpft@t-online.de>
Subject: missing attachment "registry.txt" (was: ASP_ActiveState_PerlScript ...)
Message-Id: <37AE6934.82389919@t-online.de>
On Sun, 08 Aug 1999 16:00:23 +0200
(Silly myself) Wrtl Brmpft wrote:
...
> The ASCII-file-attachment registry.txt contains all
> WinNT-Server-Registry entries that (I believe) could
> have anything to do with my problem.
...
Sorry, forgot file attachment "registry.txt" :-(
So here it is:
======================================================= registry.txt
REGEDIT4
[HKEY_CLASSES_ROOT\.pl]
@="Perl"
[HKEY_CLASSES_ROOT\.pls]
@="PerlScriptFile"
[HKEY_CLASSES_ROOT\Perl]
@="Perl File"
[HKEY_CLASSES_ROOT\Perl\DefaultIcon]
@="F:\\Perl\\bin\\Perl.exe,0"
[HKEY_CLASSES_ROOT\Perl\Shell]
[HKEY_CLASSES_ROOT\Perl\Shell\Open]
[HKEY_CLASSES_ROOT\Perl\Shell\Open\Command]
@="F:\\Perl\\bin\\Perl.exe \"%1\" %*"
[HKEY_CLASSES_ROOT\PerlScript]
@="PerlScript Language"
[HKEY_CLASSES_ROOT\PerlScript\CLSID]
@="{F8D77580-0F09-11d0-AA61-3C284E000000}"
[HKEY_CLASSES_ROOT\PerlScript\OLEScript]
[HKEY_CLASSES_ROOT\PerlScriptFile]
@="PerlScript File"
[HKEY_CLASSES_ROOT\PerlScriptFile\DefaultIcon]
@="F:\\Perl\\bin\\perlse.dll,0"
[HKEY_CLASSES_ROOT\PerlScriptFile\ScriptEngine]
@="PerlScript"
[HKEY_CLASSES_ROOT\PerlScriptFile\Shell]
[HKEY_CLASSES_ROOT\PerlScriptFile\Shell\Open]
@="&Open"
[HKEY_CLASSES_ROOT\PerlScriptFile\Shell\Open\Command]
@="F:\\WINNT\\system32\\WScript.exe \"%1\" %*"
[HKEY_CLASSES_ROOT\PerlScriptFile\Shell\Open2]
@="Open &with Command Prompt"
[HKEY_CLASSES_ROOT\PerlScriptFile\Shell\Open2\Command]
@="F:\\WINNT\\System32\\CScript.exe \"%1\" %*"
[HKEY_CLASSES_ROOT\PerlScriptFile\ShellEx]
[HKEY_CLASSES_ROOT\PerlScriptFile\ShellEx\PropertySheetHandlers]
[HKEY_CLASSES_ROOT\PerlScriptFile\ShellEx\PropertySheetHandlers\WSHProps]
@="{60254CA5-953B-11CF-8C96-00AA00B8708C}"
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}]
@="PerlScript Language"
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\Implemented Categories]
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\Implemented Categories\{F0B7A1A1-9847-11CF-8F20-00805F2CD064}]
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\Implemented Categories\{F0B7A1A2-9847-11CF-8F20-00805F2CD064}]
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\InprocServer32]
@="F:\\Perl\\bin\\PerlSE.dll"
"ThreadingModel"="Both"
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\OLEScript]
[HKEY_CLASSES_ROOT\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\ProgID]
@="PerlScript"
[HKEY_LOCAL_MACHINE\SOFTWARE\ActiveState]
[HKEY_LOCAL_MACHINE\SOFTWARE\ActiveState\ActivePerl]
[HKEY_LOCAL_MACHINE\SOFTWARE\ActiveState\ActivePerl\515]
[HKEY_LOCAL_MACHINE\SOFTWARE\ActiveState\ActivePerl\517]
[HKEY_LOCAL_MACHINE\SOFTWARE\ActiveState\PerlScript]
[HKEY_LOCAL_MACHINE\SOFTWARE\ActiveState\PerlScript\1.0]
"NoCaseCompare"=dword:00000001
"EnabledZones"=dword:00000010
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.pl]
@="Perl"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\.pls]
@="PerlScriptFile"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}]
@="PerlScript Language"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\Implemented Categories]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\Implemented Categories\{F0B7A1A1-9847-11CF-8F20-00805F2CD064}]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\Implemented Categories\{F0B7A1A2-9847-11CF-8F20-00805F2CD064}]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\InprocServer32]
@="F:\\Perl\\bin\\PerlSE.dll"
"ThreadingModel"="Both"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\OLEScript]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{F8D77580-0F09-11D0-AA61-3C284E000000}\ProgID]
@="PerlScript"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Perl]
@="Perl File"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Perl\DefaultIcon]
@="F:\\Perl\\bin\\Perl.exe,0"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Perl\Shell]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Perl\Shell\Open]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Perl\Shell\Open\Command]
@="F:\\Perl\\bin\\Perl.exe \"%1\" %*"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScript]
@="PerlScript Language"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScript\CLSID]
@="{F8D77580-0F09-11d0-AA61-3C284E000000}"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScript\OLEScript]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile]
@="PerlScript File"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\DefaultIcon]
@="F:\\Perl\\bin\\perlse.dll,0"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\ScriptEngine]
@="PerlScript"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\Shell]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\Shell\Open]
@="&Open"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\Shell\Open\Command]
@="F:\\WINNT\\system32\\WScript.exe \"%1\" %*"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\Shell\Open2]
@="Open &with Command Prompt"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\Shell\Open2\Command]
@="F:\\WINNT\\System32\\CScript.exe \"%1\" %*"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\ShellEx]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\ShellEx\PropertySheetHandlers]
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\PerlScriptFile\ShellEx\PropertySheetHandlers\WSHProps]
@="{60254CA5-953B-11CF-8C96-00AA00B8708C}"
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Perl.exe]
"Path"="F:\\Perl\\bin"
@="F:\\Perl\\bin\\perl.exe"
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\SharedDlls]
"F:\\Perl\\bin\\PerlMsg.dll"=dword:00000003
"F:\\Perl\\bin\\PerlSE.dll"=dword:00000003
"F:\\WINNT\\System32\\PerlCRT.dll"=dword:00000003
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ActivePerl]
"UninstallString"="F:\\Perl\\bin\\perl.exe F:\\Perl\\bin\\uninstall.pl F:\\Perl\\bin/p_uninst.dat"
"DisplayName"="ActivePerl build 517"
[HKEY_LOCAL_MACHINE\SOFTWARE\Perl]
@="F:\\Perl"
"bindir"="F:\\Perl\\bin"
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\EventLog\Application\PerlMsg]
"EventMessageFile"=hex(2):46,3a,5c,50,65,72,6c,5c,62,69,6e,5c,50,65,72,6c,4d,\
73,67,2e,64,6c,6c,00
"TypesSupported"=dword:00000007
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC]
<snip>
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\ASP]
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\ASP\LanguageEngines]
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\ASP\LanguageEngines\PerlScript]
"Write"="$Response->write(|);"
"WriteBlock"="$Response->writeblock(|);"
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\Parameters]
<snip>
"ServerSideIncludesEnabled"=dword:00000001
"ServerSideIncludesExtension"=".stm"
<snip>
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\Parameters\Script Map]
".idc"="F:\\WINNT\\System32\\inetsrv\\httpodbc.dll"
".pl"="F:\\Perl\\bin\\perl.exe %s"
".cgi"="F:\\Perl\\bin\\perl.exe %s"
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W3SVC\Parameters\Virtual Roots]
<snip>
=======================================================
------------------------------
Date: Mon, 09 Aug 1999 04:41:43 GMT
From: mck@iag.net (Matt)
Subject: Re: Nastiness contrary to the spirit of perl?
Message-Id: <37ae5ba9.12337149@news.iag.net>
On 8 Aug 1999 22:23:49 -0500, abigail@delanet.com (Abigail) wrote:
>Matt (mck@iag.net) wrote on MMCLXIX September MCMXCIII in
><URL:news:37b0390f.3479222@news.iag.net>:
>||
>|| There was no munging there. I was using it an example of a less
>|| reactionary, and thus more informative thread. We are all familiar
>|| with the concept of a signal to noise ratio. I am looking here at a
>|| high information to abuse ratio.
>
>And he goes off with yet another rant about this group.
I guess around here, if you do not agree with the experts, you are
ranting.
>If you can't contribute, please shut up.
I agree. ;)
------------------------------
Date: Mon, 09 Aug 1999 04:44:21 GMT
From: mck@iag.net (Matt)
Subject: Re: Nastiness contrary to the spirit of perl?
Message-Id: <37af5c21.12457362@news.iag.net>
On 09 Aug 1999 00:00:20 -0400, Matt Curtin <cmcurtin@interhack.net>
wrote:
>One really oughtn't take presence in another's killfile personally.
I agree. Unfortunately I have allowed the general lack of politeness
here to draw me into a war of the last word.
------------------------------
Date: Sun, 8 Aug 1999 22:04:04 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Need help with Perl expression and replace
Message-Id: <Pine.GSO.4.10.9908082203310.19222-100000@user2.teleport.com>
On Sun, 8 Aug 1999, Warren Bell wrote:
> If line of text contains <img src="anything" anything> replace it with
> <img src=anything anything>. The anything would be any charactor.
It looks as if you're needing to parse HTML. Use a module like
HTML::Parser, from CPAN. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 9 Aug 1999 00:32:16 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Need help with Perl expression and replace
Message-Id: <slrn7qspug.9fk.abigail@alexandra.delanet.com>
Tom Phoenix (rootbeer@redcat.com) wrote on MMCLXIX September MCMXCIII in
<URL:news:Pine.GSO.4.10.9908082203310.19222-100000@user2.teleport.com>:
'' On Sun, 8 Aug 1999, Warren Bell wrote:
''
'' > If line of text contains <img src="anything" anything> replace it with
'' > <img src=anything anything>. The anything would be any charactor.
''
'' It looks as if you're needing to parse HTML. Use a module like
'' HTML::Parser, from CPAN. Cheers!
Although HTML::Parser might be useful in this case, HTML::Parser does
NOT parse, and has 0 HTML knowledge.
I think it should be renamed Summer::Butterfly, or BBQ::Penguin.
Abigail
--
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'
-----------== 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 ==-----
------------------------------
Date: Mon, 09 Aug 1999 00:41:48 -0500
From: Steve Yates <srt@xnet.com>
Subject: Re: Net::Whois works under Win32?
Message-Id: <37AE6A1C.3677013D@xnet.com>
Horace Ho wrote:
> nothing about news.com: Bad file descriptor
I happened to see a message in comp.lang.perl.modules that this module
has just been updated (although it's not on CPAN yet). The author said
something about a new whois format at Network Solutions...?
Steve
------------------------------
Date: 09 Aug 1999 00:35:21 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Web Perl
Message-Id: <x7yaflefli.fsf@home.sysarch.com>
>>>>> "j" == janshadebeach <janshadebeach@email.msn.com> writes:
j> Hello Everyone, im Kyle, a 12-year-old beginner Perl Programmer. I
j> have just finished reading the Llama Book for the 3rd time, and i
j> need to learn how to program Web Perl. Does anyone have a good idea
j> of a book that would be good for me?
official guide to programming with cgi.pm by lincoln stein
not a great book but helpful.
j> BTW, i bet im the youngest Perl programmer in ther world. Has
j> anyone seen anyone younger?
no, but a very bright 13 year old attended yapc last june. so he is only
a little older than you but much brighter as he knows there is no such
thing as web perl. perl is perl. it is used for much more than the
web. in fact web related perl scripts are only a fraction of all the
perl code in the world. it is just that perl is the predominate language
used for the web that confuses folks.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: Sun, 8 Aug 1999 22:49:56 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Web Perl
Message-Id: <MPG.12180bd9b9a27882989e0c@nntp.hpl.hp.com>
In article <x7yaflefli.fsf@home.sysarch.com> on 09 Aug 1999 00:35:21 -
0400, Uri Guttman <uri@sysarch.com> says...
> >>>>> "j" == janshadebeach <janshadebeach@email.msn.com> writes:
...
> j> BTW, i bet im the youngest Perl programmer in ther world. Has
> j> anyone seen anyone younger?
>
> no, but a very bright 13 year old attended yapc last june. so he is only
> a little older than you but much brighter as he knows there is no such
> thing as web perl. perl is perl. it is used for much more than the
> web. in fact web related perl scripts are only a fraction of all the
> perl code in the world. it is just that perl is the predominate language
> used for the web that confuses folks.
s/predominate/predominant/
Reading posts from someone whose shift key is stuck on lower confuses
some folks too, especially younger ones who might want to know the
difference between Perl and perl, for example. :-)
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 09 Aug 1999 00:30:15 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Where to find help other than perldoc and books.
Message-Id: <x71zddfueg.fsf@home.sysarch.com>
>>>>> "A" == Abigail <abigail@delanet.com> writes:
A> I don't see the advantage. Then your program becomes 2000 lines of
A> linear code, with a "sub sub_name {" every so often. Of course, you
A> could put the subs in alphabetical order, or build a hook in your
A> editor such that the subs get shuffled each time you save to file,
A> but what would be the point?
you are bing silly. i don't name my subs A, B and C either. by having
only a few major and well named sub calls at the top, you can get a
quick understanding of the flow of a program. and i order my subs in the
file by importance and relationship to other subs. utility subs like
parsing @ARGV and others get put near the bottom. higher level calls
would be nearer the top. it is more an art deciding this in some cases.
A> I very seldomly write programs of the form:
A> sub1;
A> sub2;
A> sub3;
A> sub4;
A> exit;
A> What's the point?
if you called them something useful it helps a lot. again it depends on
the program. i don't do this every time and there is a lot of wiggle in
my designs. a short program may start out linear and i sub it as it
grows. think about using modules as a form of breaking code into
subs. we could all cut and paste the code in instead but use Foo;
Foo->new are much more readable. i aim my code for the next person to
read it (which may or may not be me) so a clear organization of the code
helps.
as for sub1 and its siblings, how i sub the code is very important. i
try to gather the code into subs which reflect a single purpose. if that
is 10 or 100 lines of ex-linear code which can be named clearly, all the
better. sometimes i will redesign much of a system to allow for better
subs. this is all part of what i try to put into my code. it is much
more than just getting it to work correctly. and it is part of what tom
was referring to when he flamed about true talent. i know you disagree
on that but some coders are just better and do it more naturally than
others. prodigies are born and not made, though they can be molded and
even broken. i consider my coding skills a combination of
learning/experience and innate talent. but it is my passion for clear
code that makes me work hard on having it reflect the function of the
program and not just implement it. i hope you and others get the
difference between the two. that difference is most often not known or
ignored.
A> @@ did you skip the word "doesn't" there?
A> No. I really do mean a client that doesn't wrap lines. Unless of course
A> told to do so. (But I've never used a client, on any OS, for which I
A> bothered to look that up.) If my newsclient gets the posting back from
A> my editor, it better *not* have a mind of its own and throw in random
A> newlines. rm would be a too soft punishment.
i am confused what you call the client. i use gnus and in editing a post
it most definitely word wraps for me as i type. it doesn't edit it
anymore after i post it. i think the latter is what you mean by a news
client doing word wrap. but any decent client should support word wrap
during compostion of the post which is what i meant.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
"F**king Windows 98", said the general in South Park before shooting Bill.
------------------------------
Date: Sun, 8 Aug 1999 22:26:39 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Where to find help other than perldoc and books.
Message-Id: <MPG.1218064ddb58a3c8989e0b@nntp.hpl.hp.com>
In article <x71zddfueg.fsf@home.sysarch.com> on 09 Aug 1999 00:30:15 -
0400, Uri Guttman <uri@sysarch.com> says...
> >>>>> "A" == Abigail <abigail@delanet.com> writes:
...
> A> I very seldomly write programs of the form:
>
> A> sub1;
> A> sub2;
> A> sub3;
> A> sub4;
> A> exit;
>
> A> What's the point?
>
> if you called them something useful it helps a lot. again it depends on
> the program. i don't do this every time and there is a lot of wiggle in
> my designs. a short program may start out linear and i sub it as it
> grows. think about using modules as a form of breaking code into
> subs. we could all cut and paste the code in instead but use Foo;
> Foo->new are much more readable. i aim my code for the next person to
> read it (which may or may not be me) so a clear organization of the code
> helps.
Another opportunity for aiding comprehension that hasn't been discussed
thus far is the enhancement of the bare calls in the list shown above by
arguments and return values. References to data structures can be
passed in and out of the sequential subroutines very efficiently. This
can make the flow of *data* between the various phases of the program
quite evident.
There will of course still be global variables that are shared among the
various phases, such as modal switches or whatever. But the dynamic
data interfaces will be much more patent, and within each of the
subroutines lexical variables can be used readily. This could be done
as well in straight-line flow by the addition of bare blocks for each
phase, but putting those blocks into once-called subroutines enhances
the encapsulation of functionality and data.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 9 Aug 1999 00:30:06 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Where to find help other than perldoc and books.
Message-Id: <slrn7qspqf.9fk.abigail@alexandra.delanet.com>
Uri Guttman (uri@sysarch.com) wrote on MMCLXIX September MCMXCIII in
<URL:news:x71zddfueg.fsf@home.sysarch.com>:
// >>>>> "A" == Abigail <abigail@delanet.com> writes:
//
// A> I don't see the advantage. Then your program becomes 2000 lines of
// A> linear code, with a "sub sub_name {" every so often. Of course, you
// A> could put the subs in alphabetical order, or build a hook in your
// A> editor such that the subs get shuffled each time you save to file,
// A> but what would be the point?
//
// you are bing silly. i don't name my subs A, B and C either. by having
// only a few major and well named sub calls at the top, you can get a
// quick understanding of the flow of a program.
The assumption was a linear program, with no major looping construct.
I expect a programmer to know what a program does before editing it.
And a simple 'first this, than that, finally so' can be said in a
comment as well.
// and i order my subs in the
// file by importance and relationship to other subs. utility subs like
// parsing @ARGV and others get put near the bottom. higher level calls
// would be nearer the top. it is more an art deciding this in some cases.
//
// A> I very seldomly write programs of the form:
//
// A> sub1;
// A> sub2;
// A> sub3;
// A> sub4;
// A> exit;
//
// A> What's the point?
//
// if you called them something useful it helps a lot.
Well, yes, of course you call them something useful. I'm just using sub1,
sub2, sub3, and sub4 has an example.
// again it depends on
// the program. i don't do this every time and there is a lot of wiggle in
// my designs. a short program may start out linear and i sub it as it
// grows. think about using modules as a form of breaking code into
// subs. we could all cut and paste the code in instead but use Foo;
// Foo->new are much more readable. i aim my code for the next person to
// read it (which may or may not be me) so a clear organization of the code
// helps.
But for a linear program, what clearer organization than linear code can
there be? Of course, minor tasks whose implementation isn't relevant still
get subbed away, but not the main flow.
// as for sub1 and its siblings, how i sub the code is very important. i
// try to gather the code into subs which reflect a single purpose. if that
// is 10 or 100 lines of ex-linear code which can be named clearly, all the
// better. sometimes i will redesign much of a system to allow for better
// subs. this is all part of what i try to put into my code. it is much
// more than just getting it to work correctly. and it is part of what tom
// was referring to when he flamed about true talent. i know you disagree
// on that but some coders are just better and do it more naturally than
// others.
I guess I lack true talent then ;-) Not that I care, as I think that's
not a requirement anyway.
// prodigies are born and not made, though they can be molded and
// even broken. i consider my coding skills a combination of
// learning/experience and innate talent. but it is my passion for clear
// code that makes me work hard on having it reflect the function of the
// program and not just implement it. i hope you and others get the
// difference between the two. that difference is most often not known or
// ignored.
//
// A> @@ did you skip the word "doesn't" there?
//
// A> No. I really do mean a client that doesn't wrap lines. Unless of course
// A> told to do so. (But I've never used a client, on any OS, for which I
// A> bothered to look that up.) If my newsclient gets the posting back from
// A> my editor, it better *not* have a mind of its own and throw in random
// A> newlines. rm would be a too soft punishment.
//
// i am confused what you call the client. i use gnus and in editing a post
// it most definitely word wraps for me as i type. it doesn't edit it
// anymore after i post it. i think the latter is what you mean by a news
// client doing word wrap. but any decent client should support word wrap
// during compostion of the post which is what i meant.
I have no experience with Gnus. In the spirit of "a tool for each task",
in my mind you have a newsreader (newsclient), that calls an editor
to compose the message. Some editors have a setting to do wordwrap
(like vi). I never turn that on - if I want a newline, I use the enter
key. But regardless of that, a newsreader should leave the text alone,
no insertions of any characters in the message should be allowed.
Abigail
--
sub _'_{$_'_=~s/$a/$_/}map{$$_=$Z++}Y,a..z,A..X;*{($_::_=sprintf+q=%X==>"$A$Y".
"$b$r$T$u")=~s~0~O~g;map+_::_,U=>T=>L=>$Z;$_::_}=*_;sub _{print+/.*::(.*)/s}
*_'_=*{chr($b*$e)};*__=*{chr(1<<$e)};
_::_(r(e(k(c(a(H(__(l(r(e(P(__(r(e(h(t(o(n(a(__(t(us(J())))))))))))))))))))))))
-----------== 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 ==-----
------------------------------
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 426
*************************************
