[13556] in Perl-Users-Digest
Perl-Users Digest, Issue: 966 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Oct 1 16:07:33 1999
Date: Fri, 1 Oct 1999 13:05:12 -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: <938808312-v9-i966@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Fri, 1 Oct 1999 Volume: 9 Number: 966
Today's topics:
activeperl chokes on this line (Nnickee)
Re: activeperl chokes on this line (Justin Masters - remove 'at' to reply)
Re: Book suggestion <nolenj@worldnet.att.net>
Re: Bye Tom? (WAS: Re: injecting "my" varibales into ca <elaine@chaos.wustl.edu>
Re: Bye Tom? (WAS: Re: injecting "my" varibales into ca <gellyfish@gellyfish.com>
Re: Coding and encoding strings... (Larry Rosler)
explicit package name error? <JFedor@datacom-css.com>
Re: How do I get this to work? (Larry Rosler)
Re: Installing modules <jeff@vpservices.com>
Kai Henningsen - please read (Henry Penninkilampi)
Perl and Access problem(DBI/DBD) <sushant@ntwrks.com>
Processing a comma delimited file < jeff@gordon-net.comXnoSpam>
reading in stderr from "here" document I create on the (Justin Masters - remove at to reply)
Re: Really difficult (or primitive?) problem? <aqumsieh@matrox.com>
Re: RegEx for html->plain text sam@samredman.com
Re: RegEx for html->plain text <uri@sysarch.com>
Re: RegEx for html->plain text sam@samredman.com
Re: RegEx for html->plain text (Abigail)
Re: RegEx for html->plain text (J. Moreno)
Re: RegEx for html->plain text sam@samredman.com
Re: RegEx for html->plain text <meowing@banet.net>
Re: remove the html tag in the file bret@pobox.com
Sys::Syslog on Solaris 2.7 <shawn@unifygroup.com>
Trouble w/ Regex in ActivePerl for Win32 <apark@netcom.com>
Re: using tr? (Abigail)
Re: Validating email addresses. (Abigail)
Re: Validating email addresses. <AgitatorsBand@yahoo.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 01 Oct 1999 19:23:06 GMT
From: nnickee@nnickee.com (Nnickee)
Subject: activeperl chokes on this line
Message-Id: <37f8090b.12065555@news.nohayman.net>
I have a text file which has as part of the first line:
NNICÑ„sÑ„sÑ„sÑ„sÑ„sÑ„sÑ„s Ñ„s Ñ„s ÑŽ‚ŠKEE
when I try to do anything with that line, winperl just dies. even a
simple
$line = $_;
print "$line";
fails.
that particular line isn't important to my script, but the lines
following it are, and I can't seem to get past that line into the meat
of my text file (oddly enough, the same line passes thru on unix perl
without any problems) ..
any ideas?
TIA
Nnickee
*~*~*~*~*~*
My newsserver seriously sux, so if you reply
and if you want me to see your reply
kindly cc me
*~*~*~*~*~*
------------------------------
Date: 01 Oct 1999 12:54:28 -0700
From: jmasters@pcocd2.intelat.com (Justin Masters - remove 'at' to reply)
Subject: Re: activeperl chokes on this line
Message-Id: <cav3dvu97rf.fsf@pcocd2.intel.com>
nnickee@nnickee.com (Nnickee) writes:
>
> I have a text file which has as part of the first line:
>
> NNICÑ„sÑ„sÑ„sÑ„sÑ„sÑ„sÑ„s Ñ„s Ñ„s ÑŽ‚ŠKEE
>
> when I try to do anything with that line, winperl just dies. even a
> simple
> $line = $_;
> print "$line";
> fails.
>
> that particular line isn't important to my script, but the lines
> following it are, and I can't seem to get past that line into the meat
> of my text file (oddly enough, the same line passes thru on unix perl
> without any problems) ..
>
> any ideas?
>
> TIA
> Nnickee
>
It wouldn't have anything to do with the CTRL-Z embedded in there, would it?
It tends to indicate EOF for DOS. It might be closing down your window/app
when it prints that.
Justin
>
>
> *~*~*~*~*~*
> My newsserver seriously sux, so if you reply
> and if you want me to see your reply
> kindly cc me
> *~*~*~*~*~*
--
------------------------------------------------------------------------------
Justin Masters (Sr. Cad Engineer - Design Automation) PH: 916-356-6735
Intel Corp. FM5-94 FAX: 916 356-7874
1900 Prairie City Rd, Folsom, CA 95630 jmasters@pcocd2.intelat.com
------------------------------
Date: Fri, 1 Oct 1999 15:19:58 -0500
From: "Nolen Johnson" <nolenj@worldnet.att.net>
Subject: Re: Book suggestion
Message-Id: <7t3412$spq$1@bgtnsc03.worldnet.att.net>
Thanks for the help.
The book is being shipped as you read this message.
Regards,
Nolen Johnson
David Cassell <cassell@mail.cor.epa.gov> wrote in message
news:37F3CC5B.7FD75D08@mail.cor.epa.gov...
> Nolen Johnson wrote:
> >
> > I'm looking for suggestions on a perl 5 book that either
> > strictly or mostly deals with regular expressions...pattern matching
etc.
> > I've got plenty of perl books, but regular expressions indeed could
> > be covered in a book by itself.
>
> Indeed. In fact, they have been. The best book on regexen
> that I have read is Jeffrey Friedl's book "Mastering Regular
> Expressions" [check at www.oreilly.com] .
>
> Just be forewarned that this book is based on Perl version
> 5.003, and so just about all the gripes the author has with
> Perl have been addressed. And there are now new Perl regex
> features which are not covered in Friedl's book, which can
> only be found in your very own Perl documentation on your
> hard drive where you installed Perl. Type 'perldoc perlre' to
> get the "bird's-eye lowdown" on these beauties.
>
> David
> --
> David Cassell, OAO cassell@mail.cor.epa.gov
> Senior computing specialist
> mathematical statistician
------------------------------
Date: Fri, 01 Oct 1999 15:11:52 -0400
From: Elaine -HFB- Ashton <elaine@chaos.wustl.edu>
Subject: Re: Bye Tom? (WAS: Re: injecting "my" varibales into callers scope)
Message-Id: <37F5072C.8473645B@chaos.wustl.edu>
Craig Berry wrote:
> Last year, Tom C. posted rather vicious ad hominem attacks against me
> because I questioned his position on free software. I wrote him off at
> that point. Since then, my work has largely shifted from Perl to
> server-side Java -- not through conscious choice, really, but I have had a
> lingering slight distaste for Perl, thanks to Tom's tight association with
> it.
This makes absolutely no sense at all. How does one person a language
make? If you like Perl and use it great, if not, how does Tom's style of
argument deter you from using what you need to?
Why are people so touchy-feely, sensitive, etc. over something so
incredibly impersonal as email and Usenet. Have you met the man, has he
insulted your mother, has he threatened you physically?
jesus h. t. christ people, get a life.
For each of you complaining about the veracity of said party, you may
also be guilty of casting the first stone.
Complete rubbish, may we stop this and get on with the usual rubbish?
*grumble*
e.
------------------------------
Date: 30 Sep 1999 22:15:32 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Bye Tom? (WAS: Re: injecting "my" varibales into callers scope)
Message-Id: <7t0ne4$3bl$1@gellyfish.btinternet.com>
On 30 Sep 1999 00:13:47 GMT Paul J. Lucas <pjl@best.com> wrote:
> In <slrn7v56b3.3d2.*@dragons.duesouth.net> *@dragons.duesouth.net (Matthew Bafford) writes:
>
>>Once upon a time (29 Sep 1999 22:27:59 GMT), Paul J. Lucas"
>><pjl@best.com> was attempting to figure out Ilya's new Perl
>>regex features, and accidently sent the following to
>>comp.lang.perl.misc:
>>: In <slrn7uuk78.k8j.*@dragons.duesouth.net> *@dragons.duesouth.net (Matthew Bafford) writes:
>>: > we'll miss you.
>>: > [tom]
>>:
>>: I won't. How can anybody think he's NOT a major asshole?
>>: He seems like an angry, bitter little man.
>
>>You know, I almost put `most of us will miss you', but, although true,
>>that isn't exactly as nice a thing to say. Anyway, I figured the
>>non-most people would have the sense and decency to keep their fingers
>>away from the keyboard.
>
> Since when does Tom deserve decency?
>
Oh deary, deary me ...
*plonk*
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Fri, 1 Oct 1999 12:04:32 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Coding and encoding strings...
Message-Id: <MPG.125ea59f6c8c887498a01c@nntp.hpl.hp.com>
In article <37F4F339.3D04AF6D@ife.ee.ethz.ch> on Fri, 01 Oct 1999
19:45:29 +0200, Alex Rhomberg <rhomberg@ife.ee.ethz.ch> says...
> Larry Rosler wrote:
> > In article <37F4C805.6789DD97@ife.ee.ethz.ch> on Fri, 01 Oct 1999
> > 16:41:09 +0200, Alex Rhomberg <rhomberg@ife.ee.ethz.ch> says...
> > > $_=uc;tr/A-MN-Z/N-ZA-M/;
> >
> > Why are you gratuitously losing the case information?
> >
> > tr/A-Za-z/N-ZA-Mn-za-m/;
>
> To make the encryption even better
tr/A-Za-z/n-za-mN-ZA-M/;
:-)
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Fri, 1 Oct 1999 16:42:10 -0400
From: "Jody Fedor" <JFedor@datacom-css.com>
Subject: explicit package name error?
Message-Id: <7t340s$aiv$1@plonk.apk.net>
I have the following subroutine:
sub getpathvars {
my $buffer = $ENV{'PATH_INFO'};
$buffer =~ s/\///;
my($cartid,$pageid) = split(/\//, $buffer);
}
After calling the subroutine I use the variable $cartid like this:
print "<TABLE width=100%>
<TR ALIGN='TOP'>
<TD ALIGN='LEFT' WIDTH=25%><A
HREF='http://www.onlysupplies.com/cgi-bin/serve.pl/$cartid/index.htm'>[Back]
</A><A
HREF='http://www.onlysupplies.com/cgi-bin/serve.pl/$cartid/sitemap.htm'>[Sit
emap]</A></TD>
<TD WIDTH=50%></TD>
<TD ALIGN='MIDDLE' WIDTH=25%><IMG SRC='/gif/os200.gif' HEIGHT=30 WIDTH=200
ALT='OnlySupplies.Com'><BR><CENTER><FONT FACE='Arial'
SIZE=2><B>1-800-832-8226</B></FONT></CENTER></TD>
</TR>
</TABLE>";
Where I obviously want perl to provide the $cartid (ie. 1023) in the
outputted html.
I'm getting this error on the server:
Global symbol "$cartid" requires explicit package name at search.pl line 27.
PS - I am using strict.
Any help would be appreciated.
Jody
------------------------------
Date: Fri, 1 Oct 1999 12:09:14 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How do I get this to work?
Message-Id: <MPG.125ea6b559daeaee98a01d@nntp.hpl.hp.com>
In article <rv9s5bfu3i565@corp.supernews.com> on Fri, 01 Oct 1999
17:34:35 GMT, Danh Dang <ddang@jhancock.com> says...
[Rearranged and clipped for readability and relevance.]
> Jordan DeLozier wrote:
> > I have a couple of scripts and people have to put in their passwords to
> > log in. The password looks something like this:
> >
> > if ($password =~ "$check") {
> > &dothis;
> > }
> >
> > if someone has a password of "Login" and they put in "Loginnow" as their
> > password, it still thinks it is right. How can I make this script only
> > take "Login" and not "Loginnow"? Exact Matches, not these type of things.
> if ($password =~ /^$check$/)
What about metacharacters in $check? For 'Exact Matches' use the 'eq'
operator. Others have posted the regex:
if ($password =~ /^\Q$check\E$/)
which is 'correct' and might win a Perl Contortionist Contest.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 1 Oct 1999 18:35:36 GMT
From: Jeff Zucker <jeff@vpservices.com>
Subject: Re: Installing modules
Message-Id: <37F4FD32.A62C0D16@vpservices.com>
Andreas Schulz wrote:
>
> I have a problem installing modules in my private directory. Two are
> running well but i have problems to install gd, libgd and chart because i
> recieve error messages with nmake. Please tell me if i can copy the files
> directly into the directory - but how do the belong?
You didn't tell us what OS you are using, but since you say "nmake"
rather than "make", I am going to assume win32. If that is the case,
then complex modules like gd which include XS code need to be compiled
for your OS, they can not simply be installed with make or nmake. The
easiest thing to do is go to www.activeState.com and get their latest
Perl and use their ppm to install the binaries of the modules you want.
See the docs on ppm on activeState (or in your local activeState
installation).
--
Jeff
------------------------------
Date: Sat, 02 Oct 1999 05:09:24 +0930
From: spamfree@metropolis.net.au (Henry Penninkilampi)
Subject: Kai Henningsen - please read
Message-Id: <spamfree-0210990509250001@d4.metropolis.net.au>
Kai,
I've just encountered the most bizarre thing: Every time I try and
retrieve one of your news postings, my PPP connection gets obliterated.
Never happened before.
Doesn't happen with anyone else's postings.
Always happens with yours. All of them!
Could you (or anyone else who is listening in) extract one of your posts,
complete with *all* headers, and email them to me so that I can see if I
can track down the cause of this odd behaviour.
Thanks!
Henry.
------------------------------
Date: Fri, 01 Oct 1999 15:17:26 -0400
From: Sushant Gargya <sushant@ntwrks.com>
Subject: Perl and Access problem(DBI/DBD)
Message-Id: <37F508C6.A59520C3@ntwrks.com>
I'm trying to get perl to talk to the Access database. I've looked at
the perl resource kit documents, but
I'm not able to get anything working.
So, far I have installed DBI and DBD::ODBC modules from activestate
repository.
Here's a the barebone script that tries to connect to the access
database:
######### Begin Script ##########
use DBI;
$dbFile="Z:\\dbfile.mdb";
$dsn = "dbi:ODBC:$dbFile";
$userid="john";
$passwd = "xyz";
$dbh = $DBI->connect("$dsn","$userid","$passwd", {RaiseError => 1});
die "$DBI connect failed: $DBI::errstr" unless $dbh;
########### End Script ##########
Does anyone see anything wrong with the above snip?? Also, would someone
be kind enough
to send a sample script that connects and fetches some fields from the
database?
Regards,
-sushant
------------------------------
Date: Fri, 1 Oct 1999 15:11:15 -0400
From: "Jeff Gordon" < jeff@gordon-net.comXnoSpam>
Subject: Processing a comma delimited file
Message-Id: <7t310l$nnf$1@autumn.news.rcn.net>
I'm very new at perl, but I've read through the books, FAQs, etc to the best
of my ability and I'm having a problem that I hope someone can give me some
guidance on. I'm trying to process a CSV file that's in the form of:
"INDEX", "LAST_NAME", "FIRST_NAME", "COMPANY", "WEBSITE"
"5", "Gordon", "Jeff", "GIS"," www.gordon-net.com"
"82", "Star ", "Blaze", "some company", ""
"13", "Jones", "John Paul", "", ""
So far I have code that looks like:
#!/usr/local/bin/perl5 -w
use CGI ':standard';
use Text::ParseWords;
my $db = "file1.txt";
open (DB, "<$db") or print "Can't open file $db\n<BR>";
# =======================
# Get the header record
$line = <DB>;
@vars = parse_csv (lc($line));
$vars = "\$" . join ", \$", @vars;
# =======================
while (<DB>) {
$line = $_;
($index, $last_name, $first_name, $company, $website) =
parse_csv($line);
### do stuff with each variable here ####
}
# =======================
sub parse_csv {
return quotewords(",",0,$_[0]);
}
========================================================
I'm processing the data just fine, but my problem is that I'd like to
generalize this a bit, so that the variable names (ie $index, $last_name,
$first_name, $company, $website) don't need hard-coded in the program but
rather get created from the first data record. That's the purpose of those
lines that deal with $vars and @vars. I feel like I'm getting close with
those lines, but I'm really not sure and I haven't a clue what to do next
with it. Can someone help me out here (and please be gentle).
Thanks ... Jeff
--
Jeff Gordon Gordon Internet Services
<jeff@gordon-net.comXnoSPAM> Internet & Web consulting
<http://www.gordon-net.com>
remove XnoSPAM from email address
------------------------------
Date: 01 Oct 1999 12:50:06 -0700
From: jmasters@pcocd2.intelat.com (Justin Masters - remove at to reply)
Subject: reading in stderr from "here" document I create on the fly?
Message-Id: <cav4sga97yp.fsf@pcocd2.intel.com>
I create a "Here" document as such:
$foo = "some_program << END_OF_INPUT\n";
$foo .= "do_this\n";
$foo .= "then_do_this\n";
$foo .= "END_OF_INPUT\n";
I tried to read it in using a filehandle, as well as the output of a
back-ticked command. But when I printed out the lines, it appears that
this program that is being run, sends data to STDOUT *AND* STDERR. I won't
go into the fact that it's bad practice to send GOOD DATA to STDERR.
Outside of running the HERE document and sending it to a file on the disk
by redirecting the STDERR to that file), I would like to be able to read it
on the fly. For some reason, I'm only able to grab the STDOUT portion of
that program being run.
I've tried:
open(FOO, "$foo |& tee |");
open(FOO, "$foo >& |");
$blah = `$foo |&`;
None of these seem to work.
What am I missing?
Justin (remove 'at' if sending direct mail)
--
------------------------------------------------------------------------------
Justin Masters (Sr. Cad Engineer - Design Automation) PH: 916-356-6735
Intel Corp. FM5-94 FAX: 916 356-7874
1900 Prairie City Rd, Folsom, CA 95630 jmasters@pcocd2.intelat.com
------------------------------
Date: Fri, 1 Oct 1999 13:38:58 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Really difficult (or primitive?) problem?
Message-Id: <x3yvh8rt1zh.fsf@tigre.matrox.com>
"Pavel Kotala" <pkotala@logis.cz> writes:
> I have asked about problem below, but I have not received any answer. Is it
> problem that has no solution or is it so primitive that no expert can waste
> his time?
It could be either. Bear in mind that usenet is not a help desk. You
shouldn't expect to get answers to all of your questions. There's
really nothing you can do about it, except wait and hope :)
In any case, you should've checked the FAQs first.
> Is there any way to set timeout for listening on TCP/IP (script should be
> run on either unix and win32)?
Checkout perlfaq8's solution to:
How do I timeout a slow event?
> I would like to listen on some port and if I would not get message in some
> time, I would need to stop listening and return from procedure.
If you are using the IO::Socket module, then you can checkout it's
documentation. I am sure it supplies a timeout() method that will help
you do what you want.
If you are not using this module, then perhaps you should look into
it.
HTH,
--Ala
------------------------------
Date: Fri, 01 Oct 1999 19:04:20 GMT
From: sam@samredman.com
Subject: Re: RegEx for html->plain text
Message-Id: <7t30j9$cl7$1@nnrp1.deja.com>
In article <37F4F6C7.44895A7C@texas.net>,
Tom Briles <sariq@texas.net> wrote:
> sam@samredman.com wrote:
> >
> > Jonathan wrote:
> > >
> > > Have you read what it says in perlfaq9 on this very subject ?
> > >
> > Can you tell me the html for this perlfaq9? I went to python.org and
> > looked the faqs and they end with the 8 series.
> >
> > Thanks,
> >
> > Sam
>
> Are you a troll, or just stupid?
>
> - Tom
>
I guess if that is how you define someone who knows nothing about a
subject, then either would be an adequate description. I know nothing
about python programming. I am trying to gather some information for
someone who is doing some for me, but who lacked info on converting html
to text. I would appreciate your help.
Thanks
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 01 Oct 1999 15:23:27 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: RegEx for html->plain text
Message-Id: <x7u2oaubps.fsf@home.sysarch.com>
>>>>> "s" == sam <sam@samredman.com> writes:
i am going to be real easy on you.
>> > Can you tell me the html for this perlfaq9? I went to python.org and
^^^^ ^^^^^^
>> > looked the faqs and they end with the 8 series.
do you see a difference in the highlighted words? why would you look for
a perl faq on the python site?
s> I guess if that is how you define someone who knows nothing about a
s> subject, then either would be an adequate description. I know nothing
s> about python programming. I am trying to gather some information for
s> someone who is doing some for me, but who lacked info on converting html
s> to text. I would appreciate your help.
why are you asking about python programming in a perl group? do you know
they are two very different languages? please figure out what you
actually want before you post here again and get truly turned into
charcoal.
just trying to be nice,
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: Fri, 01 Oct 1999 19:23:26 GMT
From: sam@samredman.com
Subject: Re: RegEx for html->plain text
Message-Id: <7t31mu$dht$1@nnrp1.deja.com>
Tom Briles <sariq@texas.net> wrote:
>
> Are you a troll, or just stupid?
>
Some additional comments:
You obviously are a python pro. I have a project where I want to
include a function which would convert an html file into text. I have
seen programs like this all over the net but most of them are quite
crude, stripping out the <> and other symbols. However, I want to create
one which will also format the text document with formatting similar to
how the original page appeared. Do you have any clues on this
subject. I found a link:
http://www.deja.com/[ST_artlink=starship.python.net,ST_Tracker=0508]/jum
p/http://starship.python.net/crew/tibs/python/html2text
but the author of this admits to its crudeness. I have written to him
as well. Have you answers beyond this?
I would certainly love to have an association with someone of your
obvious caliber who has such a confidence in his knowledge and ability
that he would be unable to fathom that someone else wouldn't understand
a subject. In my experience that is a sign of someone who knows his
stuff. I would appreciate your help. (by the way what is that perlfaq9
thing? and where would I find it)
Thanks
Sam
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 1 Oct 1999 14:34:37 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: RegEx for html->plain text
Message-Id: <slrn7va3ma.1dd.abigail@alexandra.delanet.com>
sam@samredman.com (sam@samredman.com) wrote on MMCCXXII September
MCMXCIII in <URL:news:7t30j9$cl7$1@nnrp1.deja.com>:
''
'' I guess if that is how you define someone who knows nothing about a
'' subject, then either would be an adequate description. I know nothing
'' about python programming. I am trying to gather some information for
'' someone who is doing some for me, but who lacked info on converting html
'' to text. I would appreciate your help.
Well, I know nothing about APL programming, but you don't hear me
complaining _here_, do you?
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: Fri, 1 Oct 1999 15:51:13 -0400
From: planb@newsreaders.com (J. Moreno)
Subject: Re: RegEx for html->plain text
Message-Id: <1dz06jx.exghf07nok51N@roxboro0-0042.dyn.interpath.net>
<sam@samredman.com> wrote:
> Newsgroups: comp.lang.perl.misc
>
> Tom Briles <sariq@texas.net> wrote:
> > sam@samredman.com wrote:
> > >
> > > Jonathan wrote:
> > > >
> > > > Have you read what it says in perlfaq9 on this very subject ?
> > > >
> > > Can you tell me the html for this perlfaq9? I went to python.org and
[...]
> > Are you a troll, or just stupid?
> >
> >
> I guess if that is how you define someone who knows nothing about a
> subject, then either would be an adequate description. I know nothing
> about python programming.
Python, perl, perl, python -- this is the comp.lang.perl.misc newsgroup,
no python there, he said perlfaq9, no python there, you said python.org,
no perl there.
Do you get it now? You seem to be talking about a completely different
subject than the rest of us.
--
John Moreno
------------------------------
Date: Fri, 01 Oct 1999 19:41:08 GMT
From: sam@samredman.com
Subject: Re: RegEx for html->plain text
Message-Id: <7t32oh$egh$1@nnrp1.deja.com>
Sorry for my posts here. I did not realize this was a perl conference.
Some kind fellow named Uri sent me an email to that effect.
I now see that at the top of the forum. I do have a lame excuse. What
happened is that the first link that ever I clicked on that got me here
was on the on one of the Python pages at python.org, and it just took me
right to the original question on Deja. I just assumed it was python
because of that.
I guess they had that there, because it had some relevance, I don't
know.
I am new to Deja so I didn't realize that this had nothing to do with
Python assuming that if I linked from Python.org it had to be "on
subject". So, sorry about the posts, I will attempt to find a similar
Python forum.
Sam
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 01 Oct 1999 15:50:58 -0400
From: greg andruk <meowing@banet.net>
Subject: Re: RegEx for html->plain text
Message-Id: <87k8p6507x.fsf@banet.net>
sam <sam@samredman.com> wrote:
> I guess if that is how you define someone who knows nothing about a
> subject, then either would be an adequate description. I know nothing
> about python programming. I am trying to gather some information for
> someone who is doing some for me, but who lacked info on converting html
> to text. I would appreciate your help.
You might want to look at those headers a bit more closely. This is
comp.lang.perl.misc. You're looking for comp.lang.python, two doors
down on your left.
CC'd, in the hope you'll see this before the flames get fanned more.
------------------------------
Date: Fri, 01 Oct 1999 19:07:38 GMT
From: bret@pobox.com
Subject: Re: remove the html tag in the file
Message-Id: <37f50598.29694819@news.lotus.com>
On 24 Sep 1999 19:35:41 GMT, ebohlman@netcom.com (Eric Bohlman) wrote:
I had a similar question about parsing HTML and found the suggestion
of perlfaq9 perfect. My parsing needs were simple. The only thing I
had to do before using the code suggested in perlfaq9 was to join all
my HTML lines into one string (removing the newline characters first
of course), and then parse the string. Worked perfect. But then
again, my parsing needs were simple.
Thanks alot to Eric Bohlman for posting his response.
>turboman (turboman34@hotmail.com) wrote:
>: Is anyone know how can I use perl to remove all the HTML TAGs in the
>: html file. Thanks.
>
>There's an at-length discussion of this in perlfaq9.
>
>
------------------------------
Date: 01 Oct 1999 12:54:59 PDT
From: shawn fang <shawn@unifygroup.com>
Subject: Sys::Syslog on Solaris 2.7
Message-Id: <37F51217.A7E502B8@unifygroup.com>
Hi,
Does anybody know whether Sys::Syslog works on Sun Solaris2.7 64bit OS.
I am having this error:
"ISA not supported at
/usr/local/lib/perl5/site_perl/5.005/sun4-solaris/sys/isa_defs.ph line
82."
thanks.
-shawn
------------------------------
Date: Fri, 01 Oct 1999 12:35:17 -0700
From: Andrew Park <apark@netcom.com>
Subject: Trouble w/ Regex in ActivePerl for Win32
Message-Id: <37F50CF5.27E52A83@netcom.com>
Hi, I have a text file created on a Wintel PC w/ CR & LF embedded in
them. I would like to strip out the CR and leave the LF to turn this
into a Unix text file. Using ActivePerl build 519, I've tries all of the
following
s/\n/\r/g;
s/\n/\n/g;
s/\n/\d10/g;
s/\n/\x0A/g;
s/\n//g;
s/\r/\n/g;
In every case, either the lines get concatenated into one long line or
the carriage return remains. What am I doing wrong? After every change,
I am copying the file to an NFS mounted machine and running VI from w/i
the Unix Shell to see if the ^M were still there...
Thanks for any light you can shed on this
Andrew
------------------------------
Date: 1 Oct 1999 14:55:22 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: using tr?
Message-Id: <slrn7va4t6.1dd.abigail@alexandra.delanet.com>
Tom Phoenix (rootbeer@redcat.com) wrote on MMCCXXII September MCMXCIII in
<URL:news:Pine.GSO.4.10.9910011113150.19155-100000@user2.teleport.com>:
{} On Thu, 30 Sep 1999, MeTAlMollY <sorry@geen.nl> wrote:
{}
{} > $name =~ tr/A-Z/a-z/; # this lowercase everything
{}
{} No, that affects only letters A through Z in ASCII. Characters with
{} umlauts, for example, won't be affected. Don't you have those in .nl land?
No, no characters with umlauts in Dutch, except for one or two borrowed
words from German.
There are letters with 2 dots on them, but never on capitals. (For
the obvious reason that only the first letter of a word is subject to
capitalization, and you will never have 2 dots on the first letter.)
Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
BEGIN {% % = ($ _ = " " => print "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: 1 Oct 1999 14:43:33 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Validating email addresses.
Message-Id: <slrn7va470.1dd.abigail@alexandra.delanet.com>
Abigail (abigail@delanet.com) wrote on MMCCXXII September MCMXCIII in
<URL:news:slrn7v9v1k.1dd.abigail@alexandra.delanet.com>:
||
|| They are indeed unvalid addresses. It's the space between the phrase
|| and the route-addr that's killing you. The grammar in RFC 822 does not
|| allow that. Bummer, ain't?
Someone pointed out that the RFC has additional rules that aren't
codefied in the grammar. Stay tuned.
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: Fri, 01 Oct 1999 19:55:16 GMT
From: Scratchie <AgitatorsBand@yahoo.com>
Subject: Re: Validating email addresses.
Message-Id: <Ek8J3.174$QB2.42611@news.shore.net>
Abigail <abigail@delanet.com> wrote:
: They are indeed unvalid addresses. It's the space between the phrase
: and the route-addr that's killing you. The grammar in RFC 822 does not
: allow that. Bummer, ain't?
Odd that email addresses in that format still get delivered by nearly
every mailer on the internet, though, isn't it? Maybe checking for
RFC822-validity is not as valuable as one might think.
--Art
--
--------------------------------------------------------------------------
National Ska & Reggae Calendar
http://www.agitators.com/calendar/
--------------------------------------------------------------------------
------------------------------
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 966
*************************************
