[13775] in Perl-Users-Digest
Perl-Users Digest, Issue: 1185 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 27 22:12:41 1999
Date: Wed, 27 Oct 1999 19:12: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: <941076736-v9-i1185@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Wed, 27 Oct 1999 Volume: 9 Number: 1185
Today's topics:
HTML::Parser <xeon@g-em.com>
Re: HTML::Parser <xeon@g-em.com>
Re: HTML::Parser (Abigail)
Re: HTML::Parser <gellyfish@gellyfish.com>
Re: HTML::Parser (Bart Lateur)
Re: HTML::Parser <rootbeer@redcat.com>
Re: HTML::Parser <cassell@mail.cor.epa.gov>
Re: HTML::Parser <rootbeer@redcat.com>
Re: HTML::Parser <cassell@mail.cor.epa.gov>
Re: HTML::Parser <sumengen@hotelspectra.com>
Re: Ignore the idiots (Anno Siegel)
install Calc::Date a way to use it ? <johnny@my-deja.com>
Re: install Calc::Date a way to use it ? <rootbeer@redcat.com>
Re: Interpolation and the substitution operator <lr@hpl.hp.com>
Re: invalid transmission? <emschwar@rmi.net>
Re: invalid transmission? (Alan Curry)
Re: invalid transmission? <marcel.grunauer@lovely.net>
Re: invalid transmission? (Malcolm Ray)
Re: Is it possible to test run Perl Scripts in Win98? <kjetilskotheim@iname.com>
Is Perl a good language for making text-based games? I (George P. Masologites)
Re: Is Perl a good language for making text-based games <gellyfish@gellyfish.com>
Is this a bug? (Blake Meike)
Re: Is this a bug? (Sam Holden)
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 26 Oct 1999 20:48:02 +0200
From: "XeoN" <xeon@g-em.com>
Subject: HTML::Parser
Message-Id: <7v4t1i$bs9$1@news.ipartners.pl>
Hi,
How do I use HTML::Parser module to get text from html file?
I used HTML::Parse module (it was easy to me) but i've got some troubles
with HTML::Parser.
ie.
use HTML::Parse;
use HTML::FormatText;
.....
print HTML::FormatText->new->format(parse_html($content));
How to change it into one used HTML::Parser.
XeoN
------------------------------
Date: Wed, 27 Oct 1999 21:20:36 +0200
From: "XeoN" <xeon@g-em.com>
Subject: Re: HTML::Parser
Message-Id: <7v7jce$15j$1@news.ipartners.pl>
----- Original Message -----
From: Abigail <abigail@delanet.com>
Newsgroups: comp.lang.perl.misc
Sent: Wednesday, October 27, 1999 4:19 PM
Subject: Re: HTML::Parser
> If HTML::Parse works for you, why change?
It doesn't work well for complicated html source.
Thank you all for help - I found an answer. Now its runs well.
XeoN.
> Abigail
> --
> perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\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: 27 Oct 1999 09:19:57 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: HTML::Parser
Message-Id: <slrn81e2fh.bjj.abigail@alexandra.delanet.com>
XeoN (xeon@g-em.com) wrote on MMCCXLVII September MCMXCIII in
<URL:news:7v4t1i$bs9$1@news.ipartners.pl>:
'' Hi,
''
'' How do I use HTML::Parser module to get text from html file?
'' I used HTML::Parse module (it was easy to me) but i've got some troubles
'' with HTML::Parser.
'' ie.
''
'' use HTML::Parse;
'' use HTML::FormatText;
'' .....
'' print HTML::FormatText->new->format(parse_html($content));
''
'' How to change it into one used HTML::Parser.
If HTML::Parse works for you, why change?
Abigail
--
perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\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: 27 Oct 1999 11:16:34 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: HTML::Parser
Message-Id: <3816d102_1@newsread3.dircon.co.uk>
Tom Phoenix <rootbeer@redcat.com> wrote:
> On Tue, 26 Oct 1999, David Cassell wrote:
>
>> Tom Phoenix wrote:
>> >
>> > On Tue, 26 Oct 1999, XeoN wrote:
>> >
>> > > How do I use HTML::Parser module to get text from html file?
>> >
>> > In what way were the docs for this module unclear to you?
>>
>> Well, to be fair, the docs for this module are utterly unhelpful
>> to any new Perlite who hasn't worked with OO and the Perl
>> OO-notation.
>
> Maybe someone should take one or two of those nice examples, turn them
> into pod files, annotate the programs, and make a manpage called
> HTML::ParserExamples (or whatever). I'm sure that Gisle would be glad to
> add it to the distribution.
>
> Perlite?
>
I'll dig some out when I get home ...
/J\
--
"You look lovely this evening. Have you decreased in mass?" - Alien,
The Simpsons
------------------------------
Date: Wed, 27 Oct 1999 10:15:31 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: HTML::Parser
Message-Id: <3816ceb4.201135@news.skynet.be>
XeoN wrote:
>How do I use HTML::Parser module to get text from html file?
>I used HTML::Parse module (it was easy to me) but i've got some troubles
>with HTML::Parser.
Maybe you should take a look at HTML::TokeParser (btw shouldn't there be
an "N" as in "TokenParser"?) which is part ofthe same package. It is, as
the docs say, "HTML::Parser turned inside out". Well, at least *I* find
it far more intuitive to use.
Here's a simple sample:
use HTML::TokeParser;
my $p = HTML::TokeParser->new('index.htm') or die $!;
my $token = $p->get_tag('body'); # search for start tag
print $p->get_text('/body'); # till end of body
but there's a "bug" (version 2.05), as it leaves included newlines
alone, but it *won't* insert any newlines of it's own. So "a<br>b" will
NOT be converted to "a\nb", as I would have liked, but to "ab". Yuck.
--
Bart.
------------------------------
Date: Tue, 26 Oct 1999 20:23:04 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: HTML::Parser
Message-Id: <Pine.GSO.4.10.9910262019040.29843-100000@user2.teleport.com>
On Tue, 26 Oct 1999, David Cassell wrote:
> Tom Phoenix wrote:
> >
> > On Tue, 26 Oct 1999, XeoN wrote:
> >
> > > How do I use HTML::Parser module to get text from html file?
> >
> > In what way were the docs for this module unclear to you?
>
> Well, to be fair, the docs for this module are utterly unhelpful
> to any new Perlite who hasn't worked with OO and the Perl
> OO-notation.
I won't contest that point. :-)
> But a search in the deja.com archives of this newsgroup will
> turn up several nice examples of uses of HTML::Parser.
Maybe someone should take one or two of those nice examples, turn them
into pod files, annotate the programs, and make a manpage called
HTML::ParserExamples (or whatever). I'm sure that Gisle would be glad to
add it to the distribution.
Perlite?
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 26 Oct 1999 16:49:20 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: HTML::Parser
Message-Id: <38163E00.41504069@mail.cor.epa.gov>
Tom Phoenix wrote:
>
> On Tue, 26 Oct 1999, XeoN wrote:
>
> > How do I use HTML::Parser module to get text from html file?
>
> In what way were the docs for this module unclear to you?
Well, to be fair, the docs for this module are utterly unhelpful
to any new Perlite who hasn't worked with OO and the Perl
OO-notation.
But a search in the deja.com archives of this newsgroup will
turn up several nice examples of uses of HTML::Parser.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Tue, 26 Oct 1999 15:16:14 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: HTML::Parser
Message-Id: <Pine.GSO.4.10.9910261515530.29843-100000@user2.teleport.com>
On Tue, 26 Oct 1999, XeoN wrote:
> How do I use HTML::Parser module to get text from html file?
In what way were the docs for this module unclear to you?
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 27 Oct 1999 16:00:01 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: HTML::Parser
Message-Id: <381783F1.1A176222@mail.cor.epa.gov>
Tom Phoenix wrote:
>
> On Tue, 26 Oct 1999, David Cassell wrote:
> > Well, to be fair, the docs for this module are utterly unhelpful
> > to any new Perlite who hasn't worked with OO and the Perl
> > OO-notation.
> > But a search in the deja.com archives of this newsgroup will
> > turn up several nice examples of uses of HTML::Parser.
>
> Maybe someone should take one or two of those nice examples, turn them
> into pod files, annotate the programs, and make a manpage called
> HTML::ParserExamples (or whatever). I'm sure that Gisle would be glad to
> add it to the distribution.
Funny, that was just what I was thinking. And you know,
Jonathan just posted a nice example only today which would
serve that purpose, but I wouldn't dream of schnorring
someone else's program for such a purpose... :-)
> Perlite?
Sure. I've been using the term here for nearly a year, and
it still hasn't caught on. Goes with 'Perlish', don't you think?
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Wed, 27 Oct 1999 17:36:18 -0700
From: "Baris Sumengen" <sumengen@hotelspectra.com>
Subject: Re: HTML::Parser
Message-Id: <7v85s0$crs$1@bgtnsc02.worldnet.att.net>
Why don't you share it with us.
Baris.
------------------------------
Date: 25 Oct 1999 11:02:23 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Ignore the idiots
Message-Id: <7v1dbv$u1f$1@lublin.zrz.tu-berlin.de>
Malcolm Ray <M.Ray@ulcc.ac.uk> wrote in comp.lang.perl.misc:
>red herring. In clpm, the word 'expert' is mainly used by FAQ-askers,
No. FAQ-askers always use "guru" for "expert". Probably because
it's k3wler.
Anno
------------------------------
Date: Tue, 26 Oct 1999 20:23:33 -0700
From: "John" <johnny@my-deja.com>
Subject: install Calc::Date a way to use it ?
Message-Id: <NauR3.895$DM.63121@news.corecomm.net>
Hi there group,
I am trying to use an include Date::Calc and my lovely IT guy is being very
slow in installing the needed include. Is there a way to use it by keeping
it in my home directory ? any help would be very much appreciated.
Ryan
------------------------------
Date: Tue, 26 Oct 1999 21:25:53 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: install Calc::Date a way to use it ?
Message-Id: <Pine.GSO.4.10.9910262125030.29843-100000@user2.teleport.com>
On Tue, 26 Oct 1999, John wrote:
> I am trying to use an include Date::Calc and my lovely IT guy is being
> very slow in installing the needed include. Is there a way to use it
> by keeping it in my home directory ?
Have you seen the FAQ's explanation of how to keep your own module
directory? Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Mon, 25 Oct 1999 10:21:33 -0700
From: Larry Rosler <lr@hpl.hp.com>
Subject: Re: Interpolation and the substitution operator
Message-Id: <MPG.127e3176160cd9b698a11d@nntp.hpl.hp.com>
In article <7v0u7u$i8v$1@nnrp1.deja.com> on Mon, 25 Oct 1999 06:44:14
GMT, jasonmar@my-deja.com <jasonmar@my-deja.com> says...
> I'm writing a script to rename groups of similar files.
...
> $newFileList[$index] =~ s/$matchExp/$subExp/;
>
> which works fine for basic inputs like:
> $matchExp = 'foo'
> $subExp = 'bar'
>
> I would like to add a third prompt for the modifiers like:
> $newFileList[$index] =~ s/$matchExp/$subExp/$modifiers;
> but perl hates that last part, refuses to parse it.
You can embed four of the possible modifiers within the regex. See the
entry '(?imsx-imsx)' in perlre. But '/g' isn't documented as one of
them.
> Additionally, even when I hard code the modifies like:
> $newFileList[$index] =~ s/$matchExp/$subExp/eg;
> and using the following inputs:
> $matchExp = '(foo)'
> $subExp = '$1'
>
> "foobar" would turn into "$1bar"
Use '/eeg'.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 25 Oct 1999 17:18:00 -0600
From: Eric The Read <emschwar@rmi.net>
Subject: Re: invalid transmission?
Message-Id: <xkfaep7kp1z.fsf@valdemar.col.hp.com>
abigail@delanet.com (Abigail) writes:
> Steve (smt@bpsinet.com) wrote on MMCCXLV September MCMXCIII in
> <URL:news:BhJQ3.1919$SU1.175511@news1.primary.net>:
> // I will venture to
> // guess that you are just some errogant asshole who likes to make people think
> // he is an expert! I really hope there is a respectful web master out there
> // who might be able to at least point me in the right direction to correct
> // this problem.
>
> You should be able to find web masters in alt.food.bbq.webmaster.
Ack! Why would they hang out in a group for fans of BBQ'd webmaster!
No, I should think you'd be better off looking in
alt.webmaster.drink.beer, or maybe alt.webmaster.drink.whiske?y.
-=Eric
--
"Cutting the space budget really restores my faith in humanity. It
eliminates dreams, goals, and ideals and lets us get straight to the
business of hate, debauchery, and self-annihilation."
-- Johnny Hart
------------------------------
Date: Mon, 25 Oct 1999 18:26:46 GMT
From: pacman@defiant.cqc.com (Alan Curry)
Subject: Re: invalid transmission?
Message-Id: <Gh1R3.37426$E_1.2079443@typ11.nn.bcandid.com>
In article <slrn818ens.pi9.M.Ray@carlova.ulcc.ac.uk>,
Malcolm Ray <M.Ray@ulcc.ac.uk> wrote:
>But you haven't given enough information. You haven't even identified the
>script, which makes it rather hard for anyone to help you! You also haven't
>said what you've tried so far to fix the problem, or whether you've contacted
>the script's author/vendor.
I know what script it is. And I know that the error is caused by a bug in the
documentation in which an example HTML fragment has some stuff backwards. If
you use that example, you'll get that "invalid transmission #3" message. Look
at that HTML. See the part that looks out of place? That's because it is out
of place. Swap the NAME attribute with the VALUE attribute and then it'll
work (for some small value of "work").
For the morbidly curious:
uggc://jjj.necnarg.pbz/creyfubc/
--
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: Mon, 25 Oct 1999 18:34:20 GMT
From: Marcel Grunauer <marcel.grunauer@lovely.net>
Subject: Re: invalid transmission?
Message-Id: <B7AUOCsQNnGQSwp9gfTBOmY6LQ8H@4ax.com>
On Mon, 25 Oct 1999 18:26:46 GMT, pacman@defiant.cqc.com (Alan Curry)
wrote:
> I know what script it is. And I know that the error is caused by a bug in the
> documentation in which an example HTML fragment has some stuff backwards. If
> you use that example, you'll get that "invalid transmission #3" message. Look
> at that HTML. See the part that looks out of place? That's because it is out
> of place. Swap the NAME attribute with the VALUE attribute and then it'll
> work (for some small value of "work").
>
> For the morbidly curious:
> uggc://jjj.necnarg.pbz/creyfubc/
Oh, it's *that* shop.
In this case let it be known that there is a mailing list run by
topica. For information, go to http://www.topica.com and search for
"perlshop". To subscribe, send mail to perlshop-subscribe@topica.com
--
Marcel, Perl Padawan
sub AUTOLOAD{$_=$AUTOLOAD;s;.*::;;;y;_; ;;print}&Just_Another_Perl_Hacker;
------------------------------
Date: 25 Oct 1999 11:11:56 GMT
From: M.Ray@ulcc.ac.uk (Malcolm Ray)
Subject: Re: invalid transmission?
Message-Id: <slrn818ens.pi9.M.Ray@carlova.ulcc.ac.uk>
On Sun, 24 Oct 1999 14:41:40 -0500, Steve <smt@bpsinet.com> wrote:
>why do people have to be so damn rude...all it is is a question that has not
>been answered by the host server. If you are the expert on this subject then
>you should know if it is a perl question and not just reply that it doesn't
>"sound" like one. Newsgroups are supposed to be helpful to people not for
>people to be ridiculed! It is a legitimate question and all I would like to
>know is if anyone has ever run into this problem before. I did not expect to
>be ridiculed for asking a question! There are several "programmers" out
>there who use this script and I thought some of them might be courteous
>enough to tell me if they have ever ran into this error.
But you haven't given enough information. You haven't even identified the
script, which makes it rather hard for anyone to help you! You also haven't
said what you've tried so far to fix the problem, or whether you've contacted
the script's author/vendor.
If I were your paying customer, I'd be rather concerned.
--
Malcolm Ray University of London Computer Centre
------------------------------
Date: Mon, 25 Oct 1999 19:00:03 +0200
From: Kjetil Skotheim <kjetilskotheim@iname.com>
Subject: Re: Is it possible to test run Perl Scripts in Win98?
Message-Id: <38149AA3.AED969FA@iname.com>
Lim Sun Nee wrote:
> Hi
>
> I am new to Perl programming. I have downloaded some free Perl scripts
> from the net and I want to test it out. Can I run it on my PC with Win98
> OS?
>
> If I can want software do I need and where can I get them?
Download Perl for PC from http://www.activestate.com/ActivePerl/
>
>
> If I cannot what should I do?
>
> Thank you
>
> Sunny
------------------------------
Date: Wed, 27 Oct 1999 19:56:54 GMT
From: guilds@mail.serve.com (George P. Masologites)
Subject: Is Perl a good language for making text-based games? If not, what is?
Message-Id: <3817581d.304767603@news.mindspring.com>
Hello,
I'm considering starting creation of a text-based game, in the style
of DragonRealms, GemStone III, Realms of Exile, or the various net
MUDs, MUSHs, etc. What programming language should I learn in order
to create something like this? I'm currently looking at:
Perl
C/C++
BASIC/QBASIC
Java
Pascal
COBOL
and a few others as possible options. I don't think COBOL and Java
are meant for this type of thing, but as for the others, does anyone
have a particular recommendation? (I'm currently leaning towards
Perl.)
--
George P. Masologites | guilds@mail.serve.com
Space | http://www.serve.com/guilds/astro/
Fanfiction | http://www.serve.com/guilds/ranma/
Art | http://www.serve.com/guilds/
"Feh. Knowing Ryouga he probably turns into a wombat or an inter-
dimensional sheep or something."
-Ukyou, from Zen's _Long and Winding Road_
------------------------------
Date: 27 Oct 1999 20:52:08 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Is Perl a good language for making text-based games? If not, what is?
Message-Id: <7v7olo$jq7$1@gellyfish.btinternet.com>
On Wed, 27 Oct 1999 19:56:54 GMT George P. Masologites wrote:
> Hello,
>
> I'm considering starting creation of a text-based game, in the style
> of DragonRealms, GemStone III, Realms of Exile, or the various net
> MUDs, MUSHs, etc. What programming language should I learn in order
> to create something like this? I'm currently looking at:
>
Of course its Perl - you ought to check out the modules Games::Rezrov::*
available from CPAN - this implements an Infocom game interpreter in
Perl: there is an article about it in The Perl Journal #13 - you can
get a back issue from <http://www.tpj.com>. (Hmm thats the second time
in a week I've cited that issue - must be a good un :)
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Wed, 27 Oct 1999 22:49:24 GMT
From: blakem@world.std.com (Blake Meike)
Subject: Is this a bug?
Message-Id: <FKAA2C.8CD@world.std.com>
The following program doesn't behave in at all the way I would expect.
Is this a bug, or have I overlooked something.
Blake Meike
Adero Inc.
#!/usr/bin/perl -w
use strict;
my $MAX_THREADS = 2;
my $threads = 0;
while (<DATA>) {
print STDERR "$.: $_";
while ($threads >= $MAX_THREADS) {
wait();
$threads--;
}
unless (fork()) { sleep 2; exit; }
$threads++;
}
__END__
1
2
3
4
------------------------------
Date: 27 Oct 1999 23:32:36 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: Is this a bug?
Message-Id: <slrn81f2sk.f28.sholden@pgrad.cs.usyd.edu.au>
On Wed, 27 Oct 1999 22:49:24 GMT, Blake Meike <blakem@world.std.com> wrote:
>The following program doesn't behave in at all the way I would expect.
>Is this a bug, or have I overlooked something.
What does it do, and what do you expect it to do?
It seems to do what I expect (but I haven't had much sleep and might
be expecting the wrong behaviour)...
--
Sam
comments on data are usually much more helpful than on algorithms
--Rob Pike
------------------------------
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 1185
**************************************
