[8934] in Perl-Users-Digest
Perl-Users Digest, Issue: 2552 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 11 00:10:18 1998
Date: Sun, 10 May 98 21:00:32 -0700
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, 10 May 1998 Volume: 8 Number: 2552
Today's topics:
Re: (1) Esperanto: Ivy Kellerman-2 (Martien Verbruggen)
Re: (1) Esperanto: Ivy Kellerman-2 (Miguel Carrasquer Vidal)
(1) Esperanto: Ivy Kellerman-4 nord@aol.com
(1) Esperanto: Ivy Kellerman-5 nord@aol.com
Re: a header for `Mail me copies' or `Do not mail me co <Russell_Schulz@locutus.ofB.ORG>
Re: Associative array woes (Ronald J Kimball)
bug in win95 read/sysread? <trevor@cyberspc.mb.ca>
Re: Can I select(STDOUT)? and read the text into a @var (Charles DeRykus)
CGI file writes? <noels@chilli.net.au>
Deleting key entries in a dbm file. <chanr@alderaan.colorado.edu>
Re: Deleting key entries in a dbm file. <angst@scrye.com>
Re: Email Authentication (Martien Verbruggen)
Re: Expressions Using Dates (Hakan Hjelmstrom)
FOR FUTURE REF(WHAT DOES THIS DO?) (J1T1W1)
Re: GuestBookSource <dman@one.com>
Re: How to treat a string as a perl command? (Martien Verbruggen)
Re: is it possible to grab email address from visitor o (Martien Verbruggen)
Re: mirroring sites with a perl script (Martien Verbruggen)
Re: Perl CGI problem... (Hakan Hjelmstrom)
Re: Problem when using the LWP module. (Martien Verbruggen)
Re: QRe: == vs. eq <jdf@pobox.com>
Re: Sender.pm module - Where can one obtain this file? (Hakan Hjelmstrom)
Re: Stripping HTML Tags from a file (Hakan Hjelmstrom)
Re: Win32 Perl Capturing Standard Error (Martien Verbruggen)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 11 May 1998 02:04:00 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: (1) Esperanto: Ivy Kellerman-2
Message-Id: <6j5mag$lri$4@comdyn.comdyn.com.au>
In article <6j5hkq$oj5$1@nnrp1.dejanews.com>,
nord@aol.com writes:
> To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
So... Why is c.l.p.m included in this? I mean.. What does the
pronunciation of vowels in esperanto have to do with perl?
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | If it isn't broken, it doesn't have
Commercial Dynamics Pty. Ltd. | enough features yet.
NSW, Australia |
------------------------------
Date: Mon, 11 May 1998 02:52:11 GMT
From: mcv@wxs.nl (Miguel Carrasquer Vidal)
Subject: Re: (1) Esperanto: Ivy Kellerman-2
Message-Id: <35676750.93422103@news.wxs.nl>
On 11 May 1998 02:04:00 GMT, mgjv@comdyn.com.au (Martien Verbruggen)
wrote:
>In article <6j5hkq$oj5$1@nnrp1.dejanews.com>,
> nord@aol.com writes:
>
>> To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
>
>So... Why is c.l.p.m included in this? I mean.. What does the
>pronunciation of vowels in esperanto have to do with perl?
es perl anto?
[followpus set to sci.lang only]
==
Miguel Carrasquer Vidal ~ ~
Amsterdam _____________ ~ ~
mcv@wxs.nl |_____________|||
========================== Ce .sig n'est pas une .cig
------------------------------
Date: Mon, 11 May 1998 00:50:36 GMT
From: nord@aol.com
To: Kent Jones <102252.3271@compuserve.com>
Subject: (1) Esperanto: Ivy Kellerman-4
Message-Id: <6j5i0t$osn$1@nnrp1.dejanews.com>
A COMPLETE GRAMMAR OF ESPERANTO
-- THE INTERNATIONAL LANGUAGE --
By Ivy Kellerman
NEW YORK: BOSTON: CHICAGO
D.C. HEATH AND COMPANY
Revision of 1910 Edition [1931]
-----------------------------------------------------------------------------
---------------
LESSON I
NAMES OF THE LETTERS
4. The vowels are named by their sounds as given in 2.
The names of the consonants are bo, co, cxo, do, fo, go, gxo, ho,
hxo, jo, jxo, ko, lo, mo, no, po, ro, so, sxo, to, uxo, vo, zo.
These are used in speaking of the letters, in pronouncing them in
abbreviations, as ko, to, po for k, t, p. (etc.), and in
spelling words, as bo, i, ro, do, o, = birdo.
-----------------------------------------------------------------------------------
Posted by Robert E. Nordlander
nord@aol.com, nord2@juno.com
To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
cc: Kent Jones <102252.3271@compuserve.com>
May 10, 1998
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 11 May 1998 00:53:57 GMT
From: nord@aol.com
To: Kent Jones <102252.3271@compuserve.com>
Subject: (1) Esperanto: Ivy Kellerman-5
Message-Id: <6j5i75$p5g$1@nnrp1.dejanews.com>
A COMPLETE GRAMMAR OF ESPERANTO
-- THE INTERNATIONAL LANGUAGE --
By Ivy Kellerman
NEW YORK: BOSTON: CHICAGO
D.C. HEATH AND COMPANY
Revision of 1910 Edition [1931]
-----------------------------------------------------------------------------
---------------
LESSON I
DIPHTHONGS
5. Diphthongs are combinations of two vowels uttered as a
single sound, by one breath-impulse. The diphthongs in Esperanto
contain an i or u sound as the second element, but in order to
avoid confusion with combinations of vowels not forming
diphthongs (as in (naiva, like English naive, etc.), they are
written with j and instead. Their pronunciation is as follows:
aj like ai in aisle.
ej like ei in vein, ey in they.
oj like oi in coin, oy in boy.
uj like ui in ruin, u(e)y in gluey.
eux like ayw in wayward, or like i(h)oo pronounced together.
aux like ou in out, ow in owl.
-----------------------------------------------------------------------------
------
Posted by Robert E. Nordlander
nord@aol.com, nord2@juno.com
To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
cc: Kent Jones <102252.3271@compuserve.com>
May 10, 1998
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 11 May 1998 00:15:18 +0100
From: Russell Schulz <Russell_Schulz@locutus.ofB.ORG>
Subject: Re: a header for `Mail me copies' or `Do not mail me copies'
Message-Id: <19980511.001518.3U3.rnr.w164w_-_@locutus.ofB.ORG>
stanley@skyking.OCE.ORST.EDU (John Stanley) writes:
>> why was this in comp.lang.perl?
> It wasn't.
I was referring to the perl hierarchy, not the specific obsolete
comp.lang.perl group.
I'm guessing you knew that, and are trying to appear particularly
dense today for your own amusement; why you do that is always beyond
me, but you do seem to enjoy it.
>> ah, to live in a world where news never gets lost.
> Ah, to live in a world where you can drop whatever you are doing to deal
> with a piece of mail that is just a copy of a news article.
you're right; that would be annoying.
if only there was a way to specify you didn't want them... some header...
(not to mention the Posted-And-Mailed: header proposal I grabbed off
of the internic.net internet-drafts directory recently which makes this
line of argument even more pointless...)
>> the `Mail-Copies-To: never' header explicitly advises
>> actively-maintained newsreaders to NOT mail the copies; the
>
> Please provide an RFC reference that defines this header for news.
I can't.
I don't know where it is in the RFC process; I offered to write up and
submit an RFC, but Sylvan Butler had already written up the existing
practice, including the very early copy posted with Message-ID
<5vs6fb$8a427@hpbs1500.boi.hp.com>.
--
Russell_Schulz@locutus.ofB.ORG Shad 86c
------------------------------
Date: Sun, 10 May 1998 21:24:14 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: Associative array woes
Message-Id: <1d8u0js.m19x27mzhpz4N@bay1-89.quincy.ziplink.net>
Jason <jgirard@starnetusa.com> wrote:
> I'm creating an associative array and trying to print out the name/value
> pairs in the exact same order I put them into the hash. Not sorted, not
> in a random fashion.
$hash{$key} = $value;
push @keys, $key;
# ...
foreach (@keys) {
print "$_ : $hash{$_}\n";
}
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Mon, 11 May 1998 01:03:42 GMT
From: Trevor Cordes <trevor@cyberspc.mb.ca>
Subject: bug in win95 read/sysread?
Message-Id: <35564EA4.59C3A5F@cyberspc.mb.ca>
Is there a bug in the read/sysread functions on the Win95 ports
of perl? I've tried both binary distributions and they both
fail on the following code that works great on my UNIX systems.
open(FILE,"<$file") or die;
seek(FILE,24998,0) or die;
read(FILE,$c[0],1) or die;
read(FILE,$in,50000) or die;
$s0=unpack("%32C*",$in)%32767;
read(FILE,$c[1],1) or die;
The 2nd read usually fails (yes the file is long enough for
such a read, like 2MB). If I catch & print out the return
value of the second read, it usually returns a value of 18.
Even if I change it to read 20 bytes instead of 50000 it
still returns 18.
If I change all the seeks & reads to their sys- counterparts
it still gives the exact same errors.
What the heck is going on here? It works great on my AIX
systems.
------------------------------
Date: Mon, 11 May 1998 03:04:01 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: Can I select(STDOUT)? and read the text into a @variable?
Message-Id: <Esrv6p.A2u@news.boeing.com>
In article <6j36mk$qae@news-central.tiac.net>,
DannyM <maldonadod@ct-arng.ngb.army.mil> wrote:
> I know select is only used for the write and print functions but I need to
> trap STDOUT in one of my scripts. I wanted to use DBI and DBD-Oracle
> to query my Oracle database but I have a multitude of patches to load before
> this will work and I can not wait till then. I have had to write the output
> to a
> file and then read the spooled text from the file. This is not efficient at
> all
> and I would rather have all the streamed output from STDOUT go into a
> variable
> then work with it from there. Thanks in advance for any solutions.
>
You could pipe to yourself although this'll require
the bother of a fork, (also, I'm not sure you can
make this work unless your system supports a non-
blocking wait)
Here's a possibility, e.g.,
use POSIX ":sys_wait_h";
my ($pid, $stdout);
$SIG{CHLD} = sub { 1 until waitpid($pid, WNOHANG) > 0 };
pipe(READER,WRITER) or die "can't fork: $!";
open(SAVOUT,">&STDOUT") or die "can't save stdout: $!";
open(STDOUT,">&WRITER") or die "can't dup stdout: $!";
if ($pid = fork) { ## parent reads stdout into variable
close(WRITER) or die "can't close pipe writer";
close(STDOUT) or die "can't close stdout dup";
$stdout .= $_ while <READER>;
...
} elsif (defined $pid) { ## child writes stdout into pipe
close(READER) or die "can't close pipe reader";
...
print STDOUT....
...
exit;
} else {
die "can't fork: $!";
}
open(STDOUT,">&SAVOUT") or die "can't restore stdout: $!";
__END__
HTH,
--
Charles DeRykus
------------------------------
Date: Sun, 10 May 1998 12:31:21 +1000
From: "Noel Sampol" <noels@chilli.net.au>
Subject: CGI file writes?
Message-Id: <894817050.33805@ajatar.dragon.net.au>
Hi...
If I wrote a CGI script that does a file write to a specified server file in
my web site,
what happens when the CGI script is executed by multiple users
simultaneously?
Will the data I write to the file be corrupted or does the web server know
how to handle this
situation? That is, it queues up file writes and does them on a first-come
first served basis
so that my file data gets written still by all multiple users.
Or, do I have to handle this situation myself in the CGI script code?
What if I'm writing data that is dependent on the particular user input,
that is, I'm recording
user name and user comments - will these data input to the file be the last
user who inputted their
details? Or will the file have all user input from all multiple users?
What if say, I'm keeping a record of items in a file and I want users to be
able to make modification
to the record of items - eg. delete an existing record or add a new record.
If the CGI script updates the file while another user is reading the current
record of items, will the user
reading see what the other user writing did?
Do I have to have something like
open(FILE, ">test.dat") || die "Can't open file for write";
print FILE "item=test1" || die "Can't write to file";
If the CGI script can't open or write to the file, what happens next - will
the script terminate immediately?
Thanks for any help,
Noel
noels@chilli.net.au
------------------------------
Date: Sun, 10 May 1998 18:53:22 -0600
From: "Randy" <chanr@alderaan.colorado.edu>
Subject: Deleting key entries in a dbm file.
Message-Id: <6j5i85$1bn@lace.colorado.edu>
Okay, I'm a newbie to Perl, and I have what I think is a simple question.
I'm making a newsletter subscription cgi and I'm using a form where they can
either subscribe or unsubscribe. I'm storing their e-mail addresses in a
dbm file. I have no problem entering the values and storing them, but I
can't see to figure out how to delete them in the dbm file.
Thanks in advance for the help,
Randy
------------------------------
Date: 11 May 1998 01:28:58 GMT
From: angst <angst@scrye.com>
Subject: Re: Deleting key entries in a dbm file.
Message-Id: <6j5k8q$fe4$4@jelerak.scrye.com>
Randy <chanr@alderaan.colorado.edu> wrote:
: Okay, I'm a newbie to Perl, and I have what I think is a simple question.
: I'm making a newsletter subscription cgi and I'm using a form where they can
: either subscribe or unsubscribe. I'm storing their e-mail addresses in a
: dbm file. I have no problem entering the values and storing them, but I
: can't see to figure out how to delete them in the dbm file.
When you tie a DBM file, the values are stored in a hash, yes?
try delete($dbmhash{$key});
--
Erik Nielsen <eln@rmci.net>
solaris/perl/qmail/dns weenie
this post != views of anyone at all, really
"You are like...unix GOD" -- local tech support
------------------------------
Date: 11 May 1998 01:57:16 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Email Authentication
Message-Id: <6j5lts$lri$3@comdyn.comdyn.com.au>
In article <35563375.21604858@news.ica.net>,
techsoft@abcpages.com (Alex K) writes:
> how about trying to ping the current IP?
That will tell you that the machine with that IP address is running a
working TCP/IP implementation. Nothing else.
Again: The ONLY way to validate an email address is to send a message,
and see if it bounces. When it bounces, you know it was not valid.
If it doesn't bounce, you only know that something along the line
accepted the email. You won't know where it ended up. Wether or not
you want to accept that as 'valid' is your call.
This has been discussed on this group, and many others many, many
times. Use dejanews to find the articles, and read about the reasons
why that is the only way.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | For heaven's sake, don't TRY to be
Commercial Dynamics Pty. Ltd. | cynical. It's perfectly easy to be
NSW, Australia | cynical.
------------------------------
Date: Mon, 11 May 1998 01:21:03 GMT
From: hawk@algonet.se (Hakan Hjelmstrom)
Subject: Re: Expressions Using Dates
Message-Id: <355951b6.56765584@news.algonet.se>
[CC of this posting by mail to author]
On 11 May 98 00:01:22 GMT, "Leigh Vincent" wrote:
> Hi All, I have a problem with a perl script in trying to perform expressions
> comparing dates. I am attempting to take a date and then check to see
> where it fits in various ranges.
According to the FAQ you should:
"Use the Date::Manip or Date::DateCalc modules from CPAN."
Hekan Hjelmstrvm
hawk@algonet.se
------------------------------
Date: 11 May 1998 01:30:02 GMT
From: j1t1w1@aol.com (J1T1W1)
Subject: FOR FUTURE REF(WHAT DOES THIS DO?)
Message-Id: <1998051101300200.VAA18528@ladder03.news.aol.com>
All,
Who answer my posting "WHAT DOES THIS DO?", I appreciate those of you who
answer my question right out, but those of you who have been programming in
Perl for quite sometime need to remember that there are people out here that
are trying to learn and that you shouldn't treat use like we are stupid.
Because, I know you were in our shoes at one time, seeking help from the
experts.
J1T1W1
------------------------------
Date: Sun, 10 May 1998 20:17:24 -0700
From: "dman" <dman@one.com>
Subject: Re: GuestBookSource
Message-Id: <6j5qjo$7ta$1@supernews.com>
Agreed, but your new to Perl.
I suggest looking at the code, and try to make it better by suiting your
needs. Think about security, but focus on the task ahead.
In other words get the guist of what other authors are doing.
This will get you started in writting script. And that's what is important
now.
Good Luck
d
Zenin wrote in message <894680062.381479@thrush.omix.com>...
>brian d foy <comdog@computerdog.com> wrote:
> >snip<
>: if you want to create a better mousetrap - don't basae it on the
>: old ones.
>
> Agreed. Most all of the current guest books around are really
> bad kluges with tons of security holes and generally bad programming
> practices. Build it from scratch, because you'd have a hard time
> writinge more bugs then most of the ones currently available.
>
>--
>-Zenin
> zenin@archive.rhps.org
------------------------------
Date: 11 May 1998 01:22:20 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: How to treat a string as a perl command?
Message-Id: <6j5jsc$lh1$2@comdyn.comdyn.com.au>
In article <6j15m2$2ee$1@rznews.rrze.uni-erlangen.de>,
ws97-868@wsrz1.wiso.uni-erlangen.de (Franz Kaufmann) writes:
> Suppose I have somehow assembled a string.How can I get perl to evaluate
> it as perl code?
# perldoc -f eval
# perldoc perlfunc
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | The gene pool could use a little
Commercial Dynamics Pty. Ltd. | chlorine.
NSW, Australia |
------------------------------
Date: 11 May 1998 01:51:57 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: is it possible to grab email address from visitor of your web page
Message-Id: <6j5ljt$lri$2@comdyn.comdyn.com.au>
In article <6j4414$8rb@ccuh.wlv.ac.uk>,
"Denko" <d.sarajlic2@wlv.ac.uk> writes:
> Is it possible to get email address from someone who visits your home page -
> like as you can grab their IP address and things like that as environment
> variables(if he/she has specified it in browser they use)
If it is, it has nothing to do with perl. You will have to check out
the CGI specification, and the HTTP specification. Start at
www.cgi-resources.com, and read some of the stuff there.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | For heaven's sake, don't TRY to be
Commercial Dynamics Pty. Ltd. | cynical. It's perfectly easy to be
NSW, Australia | cynical.
------------------------------
Date: 11 May 1998 01:19:04 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: mirroring sites with a perl script
Message-Id: <6j5jm8$lh1$1@comdyn.comdyn.com.au>
In article <6iq7qr$flh$1@nnrp1.dejanews.com>,
simon@scoutnet.org.uk writes:
> I have somewhere a perl script that automates mirring web sites but I can't
> find it again. Does anyone know where I can get one?
There's a simple one that comes with the LWP distribution, called
lwp-mirror. Maybe that's the one you can't find. Otherwise, you'll
have to install LWP. Get it from CPAN: http://www.perl.com/CPAN/
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | I'm desperately trying to figure out
Commercial Dynamics Pty. Ltd. | why kamikaze pilots wore helmets - Dave
NSW, Australia | Edison
------------------------------
Date: Mon, 11 May 1998 01:21:22 GMT
From: hawk@algonet.se (Hakan Hjelmstrom)
Subject: Re: Perl CGI problem...
Message-Id: <35584d90.55704428@news.algonet.se>
On Sun, 10 May 1998 21:45:24 +0200, "Martin Bentzen" wrote:
> >Check out the FAQ entry labeled
> >"How do I change one line in a file/delete a line in a file/insert a
> > line in the middle of a file/append to the beginning of a file?"
> Hmm - I have read the FAQ, can't find the code I need...
Well, the FAQ is intended to answer general questions,
not to provide readymade code. Here's the FAQ code slightly modified
to give you the general idea.
This code will not work if accessed by several processes
simultaneously (as in CGI) as it doesn't lock the files it's using.
You'll also have to handle the leftover backup file if you want to run
the script more than once.
To avoid this renaming business you should check out the -i switch
which makes Perl handle the backup file/renaming hassles for you.
It's mentioned in the docs where this code was snipped from.
Another way of doing this, provided the file in question is of modest
size, would be to read in the entire file into an array, modify the
element in question and write the file from scratch.
#!/usr/bin/perl -w
use strict;
my $insert_at_line = 5;
my $insert_this = "This is the new line of text to be inserted";
open( OLDFILE, "<testfile.txt" ) ||
die( "Couldn't open original file:\n$!" );
open( NEWFILE, ">testfile.new" ) ||
die( "Couldn't create new file:\n$!" );
while (<OLDFILE>) {
if ( $. == $insert_at_line ){
print NEWFILE "$insert_this\n"
} else {
print NEWFILE $_
}
}
close( OLDFILE ) ||
die( "Couldn't close original file:\n$!" );
close( NEWFILE ) ||
die( "Couldn't close new file:\n$!" );
rename( "testfile.txt", "testfile.bak" ) ||
die( "Problems renaming backup file:\n$!" );
rename( "testfile.new", "testfile.txt" ) ||
die( "Problems renaming new file:\n$!" );
Hekan Hjelmstrvm
hawk@algonet.se
------------------------------
Date: 11 May 1998 01:50:12 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Problem when using the LWP module.
Message-Id: <6j5lgk$lri$1@comdyn.comdyn.com.au>
In article <355139D9.58705683@primenet.com>,
snay <snay@primenet.com> writes:
> I'm attempting to use the LWP module to get information from another CGI
> program. I have no problem when sending a request to the CGI program
> via a method post, the problem comes in when I attempt to request more
> than once in a single program... I know that sounds weird, but it keeps
> happening. I use the identical code to call the other CGI program... but
It's not identical. %form and %form1 are not the same.
I suggest you use the -w flag, and the strict pragma as well. It'll
help you debug. Also check what comes back from the request before
going on and processing it.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | That's not a lie, it's a terminological
Commercial Dynamics Pty. Ltd. | inexactitude.
NSW, Australia |
------------------------------
Date: 10 May 1998 23:08:31 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: "Allan M. Due" <due@murray.fordham.edu>
Subject: Re: QRe: == vs. eq
Message-Id: <zpgpo3eo.fsf@mailhost.panix.com>
"Allan M. Due" <due@murray.fordham.edu> writes:
> Well no, no warning but the default is 76 so Outlook users are unlikely to
> change it since they are unsophisticated users by definition. Which
> programs offer such warnings?
Emacs gnus, and Gravity (to name two that I've used).
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
http://pobox.com/~jdf/
------------------------------
Date: Mon, 11 May 1998 01:26:22 GMT
From: hawk@algonet.se (Hakan Hjelmstrom)
Subject: Re: Sender.pm module - Where can one obtain this file?
Message-Id: <355a534d.57172820@news.algonet.se>
On 11 May 1998 00:45:50 GMT, angst <angst@scrye.com> wrote:
> : It's been suggested we use the sender.pm module, but are
> : unable to locate the file. The given URL is either down or not responding.
> The easy way is to get a command-line mailer for windows, and feed the
> message to it, either with open("|mailer") or a system call.
> I can't think of one offhand, but I know there are a couple available.
By coincidence I ran across one today. Don't know if it's any good
though, haven't had time to check it out yet.
http://www.stalkerlab.ch/SMailers/index.html
Hekan Hjelmstrvm
hawk@algonet.se
------------------------------
Date: Mon, 11 May 1998 01:35:05 GMT
From: hawk@algonet.se (Hakan Hjelmstrom)
Subject: Re: Stripping HTML Tags from a file
Message-Id: <355b542f.57399966@news.algonet.se>
[CC of this post emailed to author]
On Mon 11 May 1998 12:53:26 +1200, Matt McKenzie wrote:
> I have spent days trying various methods including the HTML::Parser,
> HTML::Filter modules, reading the FAQ's:
> <snipped from perlfaq9>------How do I remove HTML from a string?
> #!/usr/bin/perl -p0777
> s/<(?:[^>'"]*|(['"]).*?\1)*>//gs
> -----------------------------------
> I'm not sure how to implement this into my script.
$html_laden_text =~ s/<(?:[^>'"]*|(['"]).*?\1)*>//gs
would do the trick, but as the FAQ states, using the modules availible
is safer.
Hekan Hjelmstrvm
hawk@algonet.se
------------------------------
Date: 11 May 1998 01:29:16 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Win32 Perl Capturing Standard Error
Message-Id: <6j5k9c$lh1$3@comdyn.comdyn.com.au>
In article <35509865.D14D93DC@dhs.state.tx.us>,
Ken Chesak <ken.chesak@dhs.state.tx.us> writes:
> How do I capture standard error when running a perl script. The Perl
> errors just scoll by, I have piped to more and to a file with no
> results. I have set up the following:
The same way as you would capture stderr from other programs.
This has nothing to do with perl. You should probably ask on an NT
specific group, like comp.os.ms-windows.nt.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | I think I think, therefore I think I
Commercial Dynamics Pty. Ltd. | am.
NSW, Australia |
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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 V8 Issue 2552
**************************************
