[12626] in Perl-Users-Digest
Perl-Users Digest, Issue: 35 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jul 7 01:47:34 1999
Date: Tue, 6 Jul 1999 22:37:01 -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 Tue, 6 Jul 1999 Volume: 9 Number: 35
Today's topics:
log /dev/console also to file schnabl@email.com
Re: log /dev/console also to file (Abigail)
Re: log /dev/console also to file schnabl@email.com
Re: log /dev/console also to file (Abigail)
Re: log /dev/console also to file (Martien Verbruggen)
looking for HTML parser ii4@hotmail.com
Re: looking for HTML parser (brian d foy)
Re: Looking for old version of Perl <gellyfish@gellyfish.com>
MacPerl error msg "x did not return a true value" <john@your.abc.net.au>
Re: MacPerl error msg "x did not return a true value" <swiftkid@bigfoot.com>
Re: MacPerl error msg "x did not return a true value" (Chris Nandor)
Re: magical string increment subtlety (Abigail)
Re: magical string increment subtlety (Abigail)
Re: magical string increment subtlety <sugalskd@netserve.ous.edu>
Re: make my day fix an array :-) (Lee)
Re: make my day fix an array :-) (Abigail)
Re: make my day fix an array :-) (Thomas Weholt)
Re: make my day fix an array :-) <uri@sysarch.com>
Re: make my day fix an array :-) <elaine@wustl.edu>
META Tag Extraction Script wired2000@my-deja.com
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 05 Jul 1999 07:49:31 GMT
From: schnabl@email.com
Subject: log /dev/console also to file
Message-Id: <7lpo29$ea3$1@nnrp1.deja.com>
I want to log console output (on Unix) also to a file.
Background:
We have customers with little Unix know-how. When errors occur at their
workstations it would be helpful to us to have the console output. Since
not all processes log via syslogd, I would like to run a process which
listens to /dev/console and writes its output to a log file. This should
not be a redirect, since the output should still appear on the system
console.
Any ideas how to do this?
Any other/better solutions/ideas?
Thanks, Wolfgang.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 5 Jul 1999 05:05:17 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: log /dev/console also to file
Message-Id: <slrn7o10qa.h6v.abigail@alexandra.delanet.com>
schnabl@email.com (schnabl@email.com) wrote on MMCXXXIV September
MCMXCIII in <URL:news:7lpo29$ea3$1@nnrp1.deja.com>:
%% I want to log console output (on Unix) also to a file.
%%
%% Background:
%% We have customers with little Unix know-how. When errors occur at their
%% workstations it would be helpful to us to have the console output. Since
%% not all processes log via syslogd, I would like to run a process which
%% listens to /dev/console and writes its output to a log file. This should
%% not be a redirect, since the output should still appear on the system
%% console.
%%
%% Any ideas how to do this?
%% Any other/better solutions/ideas?
What's your Perl question again?
Abigail
--
perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
print chr 0x$& and q
qq}*excess********}'
-----------== 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, 05 Jul 1999 12:49:57 GMT
From: schnabl@email.com
Subject: Re: log /dev/console also to file
Message-Id: <7lq9lj$isl$1@nnrp1.deja.com>
In article <slrn7o10qa.h6v.abigail@alexandra.delanet.com>,
abigail@delanet.com wrote:
> %% I want to log console output (on Unix) also to a file.
> What's your Perl question again?
I wanna do the logging with a perl script (if possible).
W.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 5 Jul 1999 15:06:00 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: log /dev/console also to file
Message-Id: <slrn7o240l.h6v.abigail@alexandra.delanet.com>
schnabl@email.com (schnabl@email.com) wrote on MMCXXXIV September
MCMXCIII in <URL:news:7lq9lj$isl$1@nnrp1.deja.com>:
:: In article <slrn7o10qa.h6v.abigail@alexandra.delanet.com>,
:: abigail@delanet.com wrote:
:: > %% I want to log console output (on Unix) also to a file.
:: > What's your Perl question again?
::
:: I wanna do the logging with a perl script (if possible).
That's fine. You also want to use the keyboard to type in the Perl
program. Does that make your question a keyboard question?
Abigail
--
%0=map{reverse+chop,$_}ABC,ACB,BAC,BCA,CAB,CBA;$_=shift().AC;1while+s/(\d+)((.)
(.))/($0=$1-1)?"$0$3$0{$2}1$2$0$0{$2}$4":"$3 => $4\n"/xeg;print#Towers of Hanoi
-----------== 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: Tue, 06 Jul 1999 03:10:05 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: log /dev/console also to file
Message-Id: <hseg3.100$Qx3.7431@nsw.nnrp.telstra.net>
In article <7lq9lj$isl$1@nnrp1.deja.com>,
schnabl@email.com writes:
> In article <slrn7o10qa.h6v.abigail@alexandra.delanet.com>,
> abigail@delanet.com wrote:
>> %% I want to log console output (on Unix) also to a file.
>> What's your Perl question again?
>
> I wanna do the logging with a perl script (if possible).
You should still ask your question on a unix group. Not even in a
programming group. And the best thing would be to ask it in a group
that is specific to your OS.
Martien
--
Martien Verbruggen |
Interactive Media Division |
Commercial Dynamics Pty. Ltd. | "Mr Kaplan. Paging Mr Kaplan..."
NSW, Australia |
------------------------------
Date: Tue, 06 Jul 1999 18:49:30 GMT
From: ii4@hotmail.com
Subject: looking for HTML parser
Message-Id: <7ltj3m$lse$1@nnrp1.deja.com>
Hi!
Does anyone know if a shareware is available to
parse HTML in perl?
Is it possible to get a list of tables and the
data for each of the tables indexed by row and
columns?
Thanks in advance
John
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Tue, 06 Jul 1999 15:51:35 -0400
From: brian@pm.org (brian d foy)
Subject: Re: looking for HTML parser
Message-Id: <brian-0607991551360001@sri.dialup.access.net>
In article <7ltj3m$lse$1@nnrp1.deja.com>, ii4@hotmail.com wrote:
> Does anyone know if a shareware is available to
> parse HTML in perl?
HTML::Parser works nicely.
--
brian d foy
CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
Perl Monger Hats! <URL:http://www.pm.org/clothing.shtml>
------------------------------
Date: 3 Jul 1999 08:28:35 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Looking for old version of Perl
Message-Id: <7lkhjj$2hb$1@gellyfish.btinternet.com>
On Thu, 01 Jul 1999 08:55:55 -0400 Robert Greenwood wrote:
> Hi
>
> Does anyone know how I can get hold of an old copy of the
> Perl source distribution? I'm looking for 4.0.1.8.
>
You will find nearly every version there has ever been at :
<http://www.leo.org>
I posted the full URL of the archive in some earlier post but cant remember.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 03 Jul 1999 07:13:27 GMT
From: Wait Till Tuesday <john@your.abc.net.au>
Subject: MacPerl error msg "x did not return a true value"
Message-Id: <7lkd6k$pg$1@nnrp1.deja.com>
I'm trying to install the fabulous WebBBS software on my personal web
folder using QuidProQuo/MacPERL, and I get the error message:
webbbs.pl did not return a true value
and the line number of the "require" statement (WebBBS doesn't get
executed directly, you execute it from another file).
Can anyone give me any clues as to what this means in this context?
The scripts work fine on a UNIX server, and the MacPERL help just tells
me that it may not end in "1;" but I can assure you it does...as you
can tell, I'm kind of st
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Sat, 3 Jul 1999 14:08:49 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: MacPerl error msg "x did not return a true value"
Message-Id: <7lln89$9c94@news.cyber.net.pk>
> The scripts work fine on a UNIX server, and the MacPERL help just tells
> me that it may not end in "1;" but I can assure you it does...as you
> can tell, I'm kind of st
I am not sure about Mac, but perhaps there is no newline after 1;
so edit the file and press enter once after 1;
------------------------------
Date: Sat, 03 Jul 1999 17:59:04 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: MacPerl error msg "x did not return a true value"
Message-Id: <pudge-0307991359090001@192.168.0.77>
In article <7lkd6k$pg$1@nnrp1.deja.com>, Wait Till Tuesday
<john@your.abc.net.au> wrote:
# I'm trying to install the fabulous WebBBS software on my personal web
# folder using QuidProQuo/MacPERL, and I get the error message:
#
# webbbs.pl did not return a true value
#
# and the line number of the "require" statement (WebBBS doesn't get
# executed directly, you execute it from another file).
#
# Can anyone give me any clues as to what this means in this context?
#
# The scripts work fine on a UNIX server, and the MacPERL help just tells
# me that it may not end in "1;" but I can assure you it does...as you
# can tell, I'm kind of st
It is MacPerl, not MacPERL.
Your file probably has Unix newlines instead of Mac OS newlines. It
probably does NOT end in 1;, since the file probably is all on one line,
with the entire contents of the file being one big comment.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 2 Jul 1999 19:55:05 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: magical string increment subtlety
Message-Id: <slrn7nqnqj.31h.abigail@alexandra.delanet.com>
Christopher Hogan (chogan@cs.cmu.edu) wrote on MMCXXX September MCMXCIII
in <URL:news:377BDAF0.4E32AD8C@cs.cmu.edu>:
** I've tried the following on both 5.004_04 and 5.005_02, with the same
** strange result:
**
** > perl -e '$o="k1pam0000" ; $o++ ; print "$o\n" ;'
** 1
**
** > perl -e '$o="kpam0000" ; $o++ ; print "$o\n" ;' # note no '1' in string
** kpam0001
**
** Is this a bug or a feature? What's a work-around to get the latter
** behavior in the former case (my filenames just come with numbers in
** them)?
Feature. Or at least, the 'kpam0000' -> 'kpam0001' conversion
is a feature. 'k1pam0000' -> '1' follows the "normal" rules
for numerical operators. Whether it should be called a
"not-fully-implement-to-my-wishes-feature" or not is a matter of opinion.
The description of '++' in the manpage will tell you how it behaves.
The workaround is:
$o = "k1pam0000";
$o =~ s/([a-zA-Z]*\d*)$/++ (my $f = $1)/e;
Abigail
--
perl -wle 'print "Prime" if (0 x shift) !~ m 0^\0?$|^(\0\0+?)\1+$0'
-----------== 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: 2 Jul 1999 20:01:40 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: magical string increment subtlety
Message-Id: <slrn7nqo72.31h.abigail@alexandra.delanet.com>
Dan Sugalski (sugalskd@netserve.ous.edu) wrote on MMCXXX September
MCMXCIII in <URL:news:7lgr3v$1di$1@news.NERO.NET>:
!! In comp.lang.perl.moderated Christopher Hogan <chogan@cs.cmu.edu> wrote:
!! : I've tried the following on both 5.004_04 and 5.005_02, with the same
!! : strange result:
!!
!! :> perl -e '$o="k1pam0000" ; $o++ ; print "$o\n" ;'
!! : 1
!!
!! :> perl -e '$o="kpam0000" ; $o++ ; print "$o\n" ;' # note no '1' in string
!! : kpam0001
!!
!! : Is this a bug or a feature? What's a work-around to get the latter
!! : behavior in the former case (my filenames just come with numbers in
!! : them)?
!!
!! It's a feature. Magic increment only works with strings that match
!! /^[A-Za-z]+\d*$/, which is why the second works but the first doesn't.
!! (Since the first doesn't match, perl does a numeric conversion then
!! increments the result. -w will warn you about this one)
Really? Not my perl5.005_03.
Abigail
--
perl -weprint\<\<EOT\; -eJust -eanother -ePerl -eHacker -eEOT
-----------== 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: 3 Jul 1999 01:16:55 GMT
From: Dan Sugalski <sugalskd@netserve.ous.edu>
Subject: Re: magical string increment subtlety
Message-Id: <7ljoa7$oi8$1@news.NERO.NET>
Abigail <abigail@delanet.com> wrote:
: Dan Sugalski (sugalskd@netserve.ous.edu) wrote on MMCXXX September
: MCMXCIII in <URL:news:7lgr3v$1di$1@news.NERO.NET>:
: !! In comp.lang.perl.moderated Christopher Hogan <chogan@cs.cmu.edu> wrote:
: !! : I've tried the following on both 5.004_04 and 5.005_02, with the same
: !! : strange result:
: !!
: !! :> perl -e '$o="k1pam0000" ; $o++ ; print "$o\n" ;'
: !! : 1
: !!
: !! :> perl -e '$o="kpam0000" ; $o++ ; print "$o\n" ;' # note no '1' in string
: !! : kpam0001
: !!
: !! : Is this a bug or a feature? What's a work-around to get the latter
: !! : behavior in the former case (my filenames just come with numbers in
: !! : them)?
: !!
: !! It's a feature. Magic increment only works with strings that match
: !! /^[A-Za-z]+\d*$/, which is why the second works but the first doesn't.
: !! (Since the first doesn't match, perl does a numeric conversion then
: !! increments the result. -w will warn you about this one)
: Really? Not my perl5.005_03.
D'oh! The increment operator supresses the numeric conversion warning. And
I knew that too... (Think *then* post. I always get them mixed up)
Dan
------------------------------
Date: Fri, 02 Jul 1999 22:53:42 -0500
From: rlb@intrinsix.ca (Lee)
Subject: Re: make my day fix an array :-)
Message-Id: <B3A2F37696681AF425@0.0.0.0>
In article <377D524B.E6EE2E54@cts.wustl.edu>,
Elaine -HappyFunBall- Ashton <elaine@cts.wustl.edu> wrote:
>Abigail wrote:
>> ^^ She's *far* too good at impersonating my ex-wife to be an imposter.
>>
>> Maybe I *am* your ex-wife.
<*gulp!*>
The cheque's in the mail. I mean it this time. Honest.
>Wait! I thought you were *MY* ex-wife Abigail darling. :D
A distinct possibility, Elaine. Shall we compare notes?
Lee
------------------------------
Date: 3 Jul 1999 03:36:25 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: make my day fix an array :-)
Message-Id: <slrn7nrirn.31h.abigail@alexandra.delanet.com>
Elaine -HappyFunBall- Ashton (elaine@cts.wustl.edu) wrote on MMCXXXI
September MCMXCIII in <URL:news:377D524B.E6EE2E54@cts.wustl.edu>:
** Abigail wrote:
** > ^^ She's *far* too good at impersonating my ex-wife to be an imposter.
** >
** > Maybe I *am* your ex-wife.
**
** Wait! I thought you were *MY* ex-wife Abigail darling. :D
That too.
Abigail (and your inflatable duck is still waiting to be picked up...;-))
--
perl -we '$_ = q ;4a75737420616e6f74686572205065726c204861636b65720as;;
for (s;s;s;s;s;s;s;s;s;s;s;s)
{s;(..)s?;qq qprint chr 0x$1 and \161 ssq;excess;}'
-----------== 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: Sat, 03 Jul 1999 01:09:28 GMT
From: u970130@studbo.hit.no (Thomas Weholt)
Subject: Re: make my day fix an array :-)
Message-Id: <377d5d9f.1065075@news.eunet.no>
On 01 Jul 1999 10:40:57 -0400, Uri Guttman <uri@sysarch.com> wrote:
>well, after being stealth cc'ed by you i think my comment was even more
>on target. what i reply to and how i do so is my choice. others can kill
>file me or ignore me. i choose to ignore most posts here (the volume is
>deafening). your post triggered my reply mechanism and the sarcasm that
>came with it. it wasn't even hard nor a real perl problem, just a flow
>ofr control. you should leanr some computer science. as for my style of
( And you should learn to type )
>reply it depends on may factors, the style of the poster, my mood, my
>cat's mood, the phase of jupiter's moons, larry wall's cat's mood, how
>rich uncle bill is, among amny other things. i actualy enjoy solving
>problems and helping others. but i like to have fun and my replies can
>show that. so get off you high horse and off that stick up your butt and
>get a life with some humor in it. if every time someone tease you or
High horse? Stick up my ass? Humor in my life? You seem to know alot
about me just reading my postings here. I don`t have a horse and thins
very seldom go *UP* my ass.
>used sarcasm on you, you reacted with such a lack of grace and wit that
This forum has contains little information other than ;->, :-< etc.
when describing the mood of people. It`s not easy to be sure what you
mean when you say stuff like "duh!".
>you will forever be reacting poorly to those who actually ae trying to
>help you. this is not a friendly forum of nice folks. this is a perl
Being nice never hurt nobody.
>hacker newsgroup. we act as we please and you take from it what you
>can.
That`s ok. All I meant is that things like that can be misunderstood.
The guy might not be that into stuff yet, like newsgroups etc., and be
afraid to ask another question again. You might call him a pussy if he
doesn`t, but I think it would be in the best interest of Perl if as
many as possible did use it. Cultures vary and someplaces if you don`t
say "pretty please with sugar on top" after all things you ask for
people will think you`re rude or/and ignore you. When you answer stuff
with things like "duh!" the poor guy might end up drunk, screaming at
people on the highway going 100 mph, instead of being a
happy-perl-hacker.
> TW> Yours truly
>
>i doubt it since i am an 'a**h**e' according to you. so which is it?
>are you polite or just a script kiddie with no respect?
Script kiddie? What do you know about my age? I`m not actually a very
polite person outside groups like this. At least that`s what other
people say. But I do have respect for people who help me. I just think
we could cut down on the bullshit factor and increase the
productivity of the users of this group. It`s becoming more of a chat
channel where people post non-related messages just because they think
of something funny after reading another posting. Like that "Is Perl
better than Linux?"-thing. I admit it was pretty strange, but it
resulted in several completly idiotic postings which had nothing to do
with perl either. Other times people are bashed for posting a question
not directly containing perl-related issues. Since this group is
allready getting massive amounts of messages each day this kinds of
communication would fit better in other mediums like irc.
Ok. I`ll shut up now. I`m not a hippie-peace-loving guy with no humour
in my life, but I look into this group for information related to
perl, not for funny remarks, to study other peoples additude swings
etc. Now let`s get back to coding 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
------------------------------
Date: 03 Jul 1999 14:27:19 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: make my day fix an array :-)
Message-Id: <x7lncxzj08.fsf@home.sysarch.com>
>>>>> "TW" == Thomas Weholt <u970130@studbo.hit.no> writes:
TW> On 01 Jul 1999 10:40:57 -0400, Uri Guttman <uri@sysarch.com> wrote:
TW> ( And you should learn to type )
>> reply it depends on may factors, the style of the poster, my mood, my
>> cat's mood, the phase of jupiter's moons, larry wall's cat's mood, how
>> rich uncle bill is, among amny other things. i actualy enjoy solving
>> problems and helping others. but i like to have fun and my replies can
>> show that. so get off you high horse and off that stick up your butt and
>> get a life with some humor in it. if every time someone tease you or
TW> High horse? Stick up my ass? Humor in my life? You seem to know
TW> alot
^^^^
TW> about me just reading my postings here. I don`t have a horse and thins
^^^^^
TW> very seldom go *UP* my ass.
TW> ( And you should learn to type )
pot, meet kettle. spelling comments on usenet are very poor netiquette.
>> used sarcasm on you, you reacted with such a lack of grace and wit that
TW> This forum has contains little information other than ;->, :-< etc.
TW> when describing the mood of people. It`s not easy to be sure what you
TW> mean when you say stuff like "duh!".
well, duh, i thought duh, was mostly used in a humorous way. so duh, i
gave an accureate answer and duh, said a little goofy comment with it.
>> you will forever be reacting poorly to those who actually ae trying to
>> help you. this is not a friendly forum of nice folks. this is a perl
TW> Being nice never hurt nobody.
i get many private and public thank you's for my contributions here. i
even get comments backing my not so nice replies to others who don't
play well here. usenet is a public forum with known (but not taught
enough) rules called netiquette. like lurking in a group for a while
before posting in it. then you will leanr the tone and style of typical
posts and can play well in the group. i don't just post willy-nilly to
some new group i subscribe to. i would get my butt roasted if i did. i
look for the faq and read it. i lurk for a while and i only join in when
i feel i can either contribute something or i have a reasonable question
(and i use a good subject line).
TW> That`s ok. All I meant is that things like that can be misunderstood.
TW> The guy might not be that into stuff yet, like newsgroups etc., and be
TW> afraid to ask another question again. You might call him a pussy if he
TW> doesn`t, but I think it would be in the best interest of Perl if as
TW> many as possible did use it. Cultures vary and someplaces if you don`t
TW> say "pretty please with sugar on top" after all things you ask for
TW> people will think you`re rude or/and ignore you. When you answer stuff
TW> with things like "duh!" the poor guy might end up drunk, screaming at
TW> people on the highway going 100 mph, instead of being a
TW> happy-perl-hacker.
i don't need pretty please. i do ask (like many others here do) for
decent subjects, clear statements of the problems and issues at hand, a
reading or searching of relevant docs and resources (faq, dejanews, man
pages, books, etc.) and a snippet of code if needed.
TW> Yours truly
>>
>> i doubt it since i am an 'a**h**e' according to you. so which is it?
>> are you polite or just a script kiddie with no respect?
TW> Script kiddie? What do you know about my age? I`m not actually a very
TW> polite person outside groups like this. At least that`s what other
script kiddie is not always an age thing. it is descriptive of an
attitude about programming that uses cut and paste and no understanding
of the actual code. its cult leader is matt wright.
and why do you claim that you are polite here and not in other groups?
usually people complain its the other way around. we always here that we
perl gurus are nasty vile little beasts. i rather like us, especially
having met many of us at conferences. some actually even like me. (or
they disguise it well).
TW> Ok. I`ll shut up now. I`m not a hippie-peace-loving guy with no
TW> humour in my life, but I look into this group for information
TW> related to perl, not for funny remarks, to study other peoples
TW> additude swings etc. Now let`s get back to coding perl.
well, unfortunately for you the perl culture (which pervades this group)
has a raucous sense of humor as many geeks are wont to have. so we have
these goofy little threads sometimes which we seem to enjoy. perl golf
(i love that name) is another game we play which has little benefits to
society. maybe we should hold a charity perl golf tournament? :-) the
noise of newbies and script kiddies here is much louder than the humor
threads so i wouldn't sweat them if i were you. remember a major reason
many of us program in perl is that it is a fun language. that carries
over to the rest of the stuff we do and post about.
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: Sat, 3 Jul 1999 16:23:25 -0500
From: elaine ashton <elaine@wustl.edu>
Subject: Re: make my day fix an array :-)
Message-Id: <Pine.GSO.4.05.9907031614320.26923-100000@chaos.wustl.edu>
> well, unfortunately for you the perl culture (which pervades this group)
> has a raucous sense of humor as many geeks are wont to have. so we have
> these goofy little threads sometimes which we seem to enjoy. perl golf
> (i love that name) is another game we play which has little benefits to
> society. maybe we should hold a charity perl golf tournament? :-) the
Hmmm. A Perl PGA Golf Tournament. Hmmm. Well, besides the potential for a
few people to get clubbed to death, that could be a blast. Go for it Uri!
I am sure I could amuse a few hundred people with my caddyshack style
golf skills.
Culture! It's in there. :)
e.
--
-=]) elaine ashton // elaine@chaos.wustl.edu // r00t ([=-
-=]) A dismal wasteland of banality, cliche' and casual obscenity ([=-
------------------------------
Date: Tue, 06 Jul 1999 20:59:16 GMT
From: wired2000@my-deja.com
Subject: META Tag Extraction Script
Message-Id: <7ltqms$p51$1@nnrp1.deja.com>
Hi,
I'm trying to figure out the best way to grab data inside a META tag.
For example:
<META name="description" content="Hello world">
<META HTTP-EQUIV="Refresh" content="5;http://www.myworld.com">
Would report back data in terms of an array or any basic way of extract
data from META Tags. Ideally such that I can get something like this:
I'm starting with an array @data which is the entire webpage using
libwww and then I'd like to search through the array for any meta tags
and extract them so that I can report what Meta tags are being used,
particularly the keywords and description meta tag.
Also, anyone know how to use libwww to retrieve X bytes of data? For
example: If I only want to retrieve the first 10k of a webpage (rather
than the entire document), anyone know how?
Typical scenario is if someone has a 1meg webpage and I only want to
grab the first 10k of data as to avoid wasting bandwidth...
Thanks everyone!
Pat
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
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 35
************************************