[9574] in Perl-Users-Digest
Perl-Users Digest, Issue: 3168 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jul 15 17:08:09 1998
Date: Wed, 15 Jul 98 14:02:37 -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 Wed, 15 Jul 1998 Volume: 8 Number: 3168
Today's topics:
Re: Perl Question (ShearerUK)
Re: Perl Setup on NT <!!!nbagadio@bigfoot.com>
Re: Please... Please help me with Perl Script ! :-( (Steve Linberg)
Re: problem using Expect.pm <spamsux-tex@habit.com>
Re: problem using Expect.pm <markjr@shmOOze.net>
Recipient Validation <webmaster@mediapromotion.ch>
Re: Recipient Validation <Tony.Curtis+usenet@vcpc.univie.ac.at>
Re: Recipient Validation <webmaster@mediapromotion.ch>
Re: Recipient Validation (Steve Linberg)
Re: Recipient Validation <Tony.Curtis+usenet@vcpc.univie.ac.at>
Regexp to handle \\n\n\n <Bill_York@MathWorks.com>
Re: Regexp to handle \\n\n\n (Steve Linberg)
Re: Rounding xxx.xxxxxx to xxx.xx <tonylabb@infonline.net>
subnet broadcast & segment IP calculation jean-sebastien@jazzmail.com
Re: use strict <barnett@houston.Geco-Prakla.slb.com>
Re: use strict (Craig Berry)
Re: use strict (Craig Berry)
using perl to pass flags from checkboxes to database fi melspace@my-dejanews.com
Re: Win32 - SMTP (Stefaan A Eeckels)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 15 Jul 1998 20:07:45 GMT
From: sheareruk@aol.com (ShearerUK)
Subject: Re: Perl Question
Message-Id: <1998071520074600.QAA17464@ladder01.news.aol.com>
>assuming your ssi call is a typo since you're missing a closing ".
>
>well, for one thing, the \n has to be in double-quotes ("\n"). you can get
>around any backslashing by using qq() which is the same as double-quotes.
>
>print qq(<!--#exec cgi="counter.cgi"-->\n);
>or
>print '<!--#exec cgi="counter.cgi"-->', "\n");
>or, to answer your question
>print "<!--#exec cgi=\"counter.cgi\"-->\n";
>
>i would suggest that you rtfm. `perldoc perlop` see: quote and quote like
>characters.
>
>... man, i'm starting to get all old and crusty with these questions now.
>8^)
>--
>Kelly William Hirano Stanford Athletics:
>hirano@cs.stanford.edu http://www.gostanford.com/
>hirano@alumni.stanford.org (WE) BEAT CAL (AGAIN)! 100th BIG GAME: 21-20
>
Thanks for the help...I realized I screwed up copying into the message what I
was trying to do...but you answered my question
------------------------------
Date: Wed, 15 Jul 1998 19:21:43 GMT
From: "Nolan B" <!!!nbagadio@bigfoot.com>
Subject: Re: Perl Setup on NT
Message-Id: <bj7r1.4$GO1.53111@news-srv1.fmr.com>
You need to associate .pl files with the c:\perl\bin\perl.exe
Steve Linberg wrote in message ...
>In article <6oiop5$7cm$1@news-1.news.gte.net>, "tdean" <tdeanatgtedotnet>
wrote:
>
>So perl c:\perl\bin\perlscript.pl doesn't work?
>
>
>> perlscript.pl is in c:\perl\bin
>>
>> --
>> ICQ 7305805
>> replace at with @ and dot with .
>> Steve Linberg wrote in message ...
>> >In article <6ogu63$nje$1@news-2.news.gte.net>, "tdean"
<tdeanatgtedotnet>
>> wrote:
>> >
>> >> I want to execute my perl scripts from within the Dos box on NT4SP3
from
>> C:\
>> >> I have added the following to the path environment variable:
>> >> C:\;C:\Perl\bin and rebooted the machine to take effect
>> >> when I then open a NT Dos box which defaults to c:\ and I try to
execute
>> a
>> >> perl script:
>> >> perl perlscript.pl I get the following msg:
>> >> "can't open perl script perlscript.pl. No such file or directory"
>> >> guys, whats the fix for this?
>> >
>> >where is perlscript.pl?
>> >_____________________________________________________________________
>> >Steve Linberg National Center on Adult Literacy
>> >Systems Programmer &c. University of Pennsylvania
>> >linberg@literacy.upenn.edu http://www.literacyonline.org
>_____________________________________________________________________
>Steve Linberg National Center on Adult Literacy
>Systems Programmer &c. University of Pennsylvania
>linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: Wed, 15 Jul 1998 15:46:55 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Please... Please help me with Perl Script ! :-(
Message-Id: <linberg-1507981546550001@projdirc.literacy.upenn.edu>
In article <6oislj$d4p$1@nnrp1.dejanews.com>, travis4086@my-dejanews.com wrote:
> To any one who would love to take a minute and tell me how to do something:
>
> I am creating a form online and I want to make a perl script that would take
> the input from the first page, and go to a second page based on that input.
> And then from the input on that page they get sent to another page based on
> the previous input. ?????? Does any one think that they can help me ?
>
> I figure I just need a bunch of "if,then" statements.
No, you need to learn programming, which is much more than a bunch of "if,
then" statements. What you should do is pick up "Learning Perl" or some
other book that will teach you what you want to know.
> If you or any one like you or who ever is reading this and want's to help a 15
> year old boy. PLease PLease Email me... Tfawcett@see.net
You're never too young to learn programming. Here's a sample of what you
could learn to do very easily:
--------------------------------
#!/usr/bin/perl
use CGI;
$q = new CGI;
if (q->param(parameter1)) {
print "Location: http://www.foo.com/page1.html";
} elsif (q->param(parameter1)) {
print "Location: http://www.foo.com/page2.html";
}
# etc.
--------------------------------
Good luck on your programming ventures. Remember to read the FAQs before
you ask questions. And never post the same question under two different
headers.
_____________________________________________________________________
Steve Linberg National Center on Adult Literacy
Systems Programmer &c. University of Pennsylvania
linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: Wed, 15 Jul 1998 11:47:20 +0800
From: Austin Schutz <spamsux-tex@habit.com>
To: Stunt Pope <markjr@mail.PrivateWorld.com>
Subject: Re: problem using Expect.pm
Message-Id: <35AC2648.7A@habit.com>
Stunt Pope wrote:
>
> ------------------------Begin ROT26 Encoded Text
>
> This has had me stumped all day. I'm using Expect.pm 1.07. I am already
> using this in a script that changes system passwds just fine. I simply
> copied that script and changed to suit, and for the life of me I can't
> get it start up the stronghold server (version Stronghold/1.3.4
> Ben-SSL/1.3 Apache/1.1.3).
>
> To me it looks like it traps the "Enter PEM Passphrase:" prompt just
> fine, but it doesn't seem to want to write the passwd back to it.
> The annoying thing is it works *occasionally*, like 1 try out of 20.
>
Sometimes what can happen is your script can end and close the handle
between it and the httpd before the httpd expects it. Something you
might try would be $HTTPS->soft_close() after the print $HTTPS
"$passwd\r" line. soft_close() will block for up to 15 seconds waiting
for a child to finish up and exit by itself.
If that doesn't fix it please let me know.
Austin
------------------------------
Date: Wed, 15 Jul 1998 16:30:04 -0400 (EDT)
From: Stunt Pope <markjr@shmOOze.net>
To: tex@habit.com
Subject: Re: problem using Expect.pm
Message-Id: <XFMail.980715163004.markjr@shmOOze.net>
On 15-Jul-98 Austin Schutz wrote:
> Sometimes what can happen is your script can end and close the handle
> between it and the httpd before the httpd expects it. Something you
> might try would be $HTTPS->soft_close() after the print $HTTPS
> "$passwd\r" line. soft_close() will block for up to 15 seconds waiting
> for a child to finish up and exit by itself.
> If that doesn't fix it please let me know.
>
> Austin
I tried that, and the first time it worked! The 2nd and 3rd time however,
it didn't. I was also thinking of playing with the stty functions. I.e.
trying 'raw' etc, but I'm not very well versed in that.
Thanks for the reply tho, any other ideas?
-mark
---
Mark Jeftovic aka: mark jeff or vic, stunt pope.
markjr@shmOOze.net http://www.shmOOze.net/~markjr
Private World's BOFH http://www.PrivateWorld.com
irc: L-bOMb Keep `em Guessing
------------------------------
Date: Wed, 15 Jul 1998 21:27:57 +0200
From: "H.P. Buerki" <webmaster@mediapromotion.ch>
Subject: Recipient Validation
Message-Id: <35AD02BD.298D9787@mediapromotion.ch>
Hi
how i can make for sure, that the Recipient Addresses are valid on the
Remote Server before i will send an E-Mail.
Does somebody have a Perl or something like that Script, that can make
Address checks on Remote Sites and gives a 0 if invalid and a 1 if the
Address is valid?
Thanks in advance
------------------------------
Date: 15 Jul 1998 21:42:56 +0200
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: Recipient Validation
Message-Id: <7x90lunbnj.fsf@fidelio.vcpc.univie.ac.at>
Re: Recipient Validation, H <webmaster@mediapromotion.ch>
said:
H> Hi how i can make for sure, that the Recipient Addresses
H> are valid on the Remote Server before i will send an
H> E-Mail.
You can't. It's impossible.
hth
tony
--
Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/
"You see? You see? Your stupid minds! Stupid! Stupid!" ~ Eros, Plan9 fOS.
------------------------------
Date: Wed, 15 Jul 1998 22:19:16 +0200
From: "H.P. Buerki" <webmaster@mediapromotion.ch>
Subject: Re: Recipient Validation
Message-Id: <35AD0EC4.E167A892@mediapromotion.ch>
That's not an answer !!!
You better don't write something than these!
It's possible to validate an E-Mail Address via nslookup -q=mx and check
trough the Servers manually via telnet an vrfy and so on.
I don't think so that nobody had ever an Idea to automate this Process.
Tony Curtis wrote:
>
> Re: Recipient Validation, H <webmaster@mediapromotion.ch>
> said:
>
> H> Hi how i can make for sure, that the Recipient Addresses
> H> are valid on the Remote Server before i will send an
> H> E-Mail.
>
> You can't. It's impossible.
>
> hth
> tony
> --
> Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
> Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/
>
> "You see? You see? Your stupid minds! Stupid! Stupid!" ~ Eros, Plan9 fOS.
------------------------------
Date: Wed, 15 Jul 1998 16:45:32 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Recipient Validation
Message-Id: <linberg-1507981645320001@projdirc.literacy.upenn.edu>
In article <35AD0EC4.E167A892@mediapromotion.ch>, "H.P. Buerki"
<webmaster@mediapromotion.ch> wrote:
> That's not an answer !!!
That *is* the answer. Tony is correct. *You can't do it.* It's
impossible. The only way to validate an email address is to send mail to
it and see if it bounces. And in so doing, you have to assume that no
bounces got lost on their way back to you, which is not safe at all to
assume. And how long are you going to wait for the bounce? Etc., etc.
THERE IS NO WAY TO PROGRAMMATICALLY VERIFY THE VALIDITY OF AN EMAIL ADDRESS.
> It's possible to validate an E-Mail Address via nslookup -q=mx and check
> trough the Servers manually via telnet an vrfy and so on.
No. What makes you think my server will accept your telnet queries? What
makes you think that nslookup will be exactly up to date with my machine?
What makes you so sure that the user you checked (somehow) an hour ago
still exists now?
Please see perlfaq9: How do I check a valid email address?
> Tony Curtis wrote:
> >
> > Re: Recipient Validation, H <webmaster@mediapromotion.ch>
> > said:
> >
> > H> Hi how i can make for sure, that the Recipient Addresses
> > H> are valid on the Remote Server before i will send an
> > H> E-Mail.
> >
> > You can't. It's impossible.
_____________________________________________________________________
Steve Linberg National Center on Adult Literacy
Systems Programmer &c. University of Pennsylvania
linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: 15 Jul 1998 22:48:36 +0200
From: Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
Subject: Re: Recipient Validation
Message-Id: <7xemvmdemz.fsf@fidelio.vcpc.univie.ac.at>
Re: Recipient Validation, H
<webmaster@mediapromotion.ch> said:
H> That's not an answer !!! You better don't write
H> something than these!
I didn't come here expecting a Monty Python sketch.
H> It's possible to validate an E-Mail Address via nslookup
H> -q=mx and check trough the Servers manually via telnet an
H> vrfy and so on.
No, it isn't. You cannot verify a remote email address.
You cannot do it. I repeat. You cannot do it. If you
think you can, then you should run to your nearest bookshop
and find some good books on internet security and scour e.g.
http://www.sendmail.org/
about privacy configuration.
hth
tony
--
Tony Curtis, Systems Manager, VCPC, | Tel +43 1 310 93 96 - 12; Fax - 13
Liechtensteinstrasse 22, A-1090 Wien, AT | http://www.vcpc.univie.ac.at/
"You see? You see? Your stupid minds! Stupid! Stupid!" ~ Eros, Plan9 fOS.
------------------------------
Date: 15 Jul 1998 20:08:50 GMT
From: Bill_York <Bill_York@MathWorks.com>
Subject: Regexp to handle \\n\n\n
Message-Id: <6oj28i$kob$1@turing.mathworks.com>
I'm trying to cobble some regexp to turn:
"\\n\n\n"
into
"\\n
"
(note the two newlines)
this is what I have right now:
$value = '\\\\n\n\n';
print "'$value'\n";
$value =~ s/([^\\?])\\n/$1\n/g;
print "'$value'\n";
but this leaves an extry "\n" in the output.
so this actually works:
$value = '\\\\n\n\n';
print "'$value'\n";
$value =~ s/([^\\?])\\n/$1\n/g;
$value =~ s/([^\\?])\\n/$1\n/g;
print "'$value'\n";
but it's very ugly.
any suggestions?
thanks!
--
William York
william@mathworks.com
------------------------------
Date: Wed, 15 Jul 1998 16:31:47 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Regexp to handle \\n\n\n
Message-Id: <linberg-1507981631470001@projdirc.literacy.upenn.edu>
In article <6oj28i$kob$1@turing.mathworks.com>, Bill_York
<Bill_York@MathWorks.com> wrote:
> I'm trying to cobble some regexp to turn:
>
> "\\n\n\n"
>
> into
>
> "\\n
>
<snip>
> but it's very ugly.
Sure is!
> any suggestions?
No less ugly:
$value = '\\\\n\\n\\n';
$value =~ s/\\n\\n\\n/\\n\n\n/;
What exactly are you trying to do? Turn three '\n' sequences into one?
How are you actually going to use this?
Ha: you could always do this:
$value =~ s/\\\\n\\n\\n/\\\\n\n\n/;
See the point? What are you trying to do?
You might want to look at perldoc -f chomp, too.
_____________________________________________________________________
Steve Linberg National Center on Adult Literacy
Systems Programmer &c. University of Pennsylvania
linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: Wed, 15 Jul 1998 14:36:06 -0400
From: Tony Labbiento <tonylabb@infonline.net>
Subject: Re: Rounding xxx.xxxxxx to xxx.xx
Message-Id: <35ACF696.A65055FA@infonline.net>
Have you tried using the "printf" command?
Joe Halbrook wrote:
>
> Here's a quick and easy one for you:
>
> I need to round numbers like: 529.337263 to 529.34
>
> What is the Perl syntax for doing this?
>
> Thank you very much.
>
> Joe Halbrook
--
****************************************
* Tony Labbiento *
* Infinity Online, Inc. *
****************************************
------------------------------
Date: Wed, 15 Jul 1998 20:23:54 GMT
From: jean-sebastien@jazzmail.com
Subject: subnet broadcast & segment IP calculation
Message-Id: <6oj34p$pkl$1@nnrp1.dejanews.com>
I've done a few searches, but most of the scripts I've found are much too
complete for what I'm looking for. Perhaps someone could point me in the right
direction? ie: a URL or snipets containing pieces I can stick together?
I'm looking for a small script which would return the Subnet and Broadcast IPs
based on my Host and Netmask IPs.
ie:
input: host 10.0.0.5, netmask 255.255.255.252
ouput: subnet 10.0.0.4, broadcast 10.0.0.7
I'm ok with perl, just not very comfortable with all the binary AND OR'ing
involved. :-)
Thanks!
js.
--
Jean-Sebastien Morisset, Sr. UNIX Administrator
Our Homebrewery Page <http://www.axess.com/users/jsm-mv/homebrewery/>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Wed, 15 Jul 1998 15:20:56 -0500
From: Dave Barnett <barnett@houston.Geco-Prakla.slb.com>
To: Gil Brown <gil_brown@hp.com>
Subject: Re: use strict
Message-Id: <35AD0F28.6AD30C1@houston.Geco-Prakla.slb.com>
[courtesy cc to cited author]
Gil Brown wrote:
>
> I trying to learn perl5 (I've only written stuff in 4 so far) and I am
> having a problem with use strict. All I want to do is read from a file
> (simple enough) and when I uncomment use strict nothing works and it does
> when I comment it. This is the example I am referring to:
>
> #! /usr/bin/perl -w
> ######################
> #
> #
> #use strict;
> use FileHandle;
>
> my $fh = new FileHandle; # Create local filehandle
> open ($fh, "/home/gbrown/test/lolo") || die $!;
> $line = <$fh>;
> print "$line\n";
> while ($line ne "")
> {
> print "$line\n";
> $line = <$fh>;
> }
>
> Thank you for your help!
>
> P.S. This is the error message I get when I use use strict
>
> # ./test
> Global symbol "line" requires explicit package name at ./test line 10.
> Execution of ./test aborted due to compilation errors.
You might also want to 'use diagnostics;' for a while to get more
detailed information about perl5's messages.
Under use strict, you cannot just blindly use variables, unless you tell
perl otherwise. Have a look at use strict, use vars, and use refs, in
the Blue Camel.
The message is telling you that perl has seen your request to use the
variable $line, but doesn't know which one you mean. There may be
multiple $line variables floating about in various packages, so use
strict is telling perl to be more stringent about making you specify
which one you want. It removes ambiguity, and helps you (the
programmer) reduce bugs.
$::line = <fh>; is one way to do it.
my $line = <fh>; also removes the ambiguity.
$::line is the same as typing:
$main::line
The following will also do the trick:
use strict;
use vars qw($line);
$line = <fh>;
Once you fix line 10, you will get errors on other variables until you
either specify their package or use one of the above tricks.
HTH.
Cheers,
Dave
--
"Security through obscurity is no security at all."
-comp.lang.perl.misc newsgroup posting
----------------------------------------------------------------------
Dave Barnett U.S.: barnett@houston.Geco-Prakla.slb.com
DAPD Software Support Eng U.K.: barnett@gatwick.Geco-Prakla.slb.com
----------------------------------------------------------------------
------------------------------
Date: 15 Jul 1998 20:43:44 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: use strict
Message-Id: <6oj4a0$5gg$2@marina.cinenet.net>
Gil Brown (gil_brown@hp.com) wrote:
: I trying to learn perl5 (I've only written stuff in 4 so far) and I am
: having a problem with use strict. All I want to do is read from a file
: (simple enough) and when I uncomment use strict nothing works and it does
: when I comment it. This is the example I am referring to:
[snip, with no previous mention of $line]
: $line = <$fh>;
[snip]
: P.S. This is the error message I get when I use use strict
:
: # ./test
: Global symbol "line" requires explicit package name at ./test line 10.
: Execution of ./test aborted due to compilation errors.
So why are you asking us? Strict just told you precisely and
unambiguously what the problem is; you have a global symbol, line (in the
scalar name $line), which is not package qualified.
Reading the doc on use strict and related areas would tell you that when
using strict, all vars must be declared before use (either lexically with
'my', or globally with 'use vars'), or fully package qualified. $line is
neither, ergo boom.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: 15 Jul 1998 20:46:22 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: use strict
Message-Id: <6oj4eu$5gg$3@marina.cinenet.net>
Steve Linberg (linberg@literacy.upenn.edu) wrote:
: use vars (qw {$line});
Outer parens are superfluous. Use of braces as qw delimeters seems a bit
potentially misleading (though perfectly OK, of course).
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: Wed, 15 Jul 1998 19:00:44 GMT
From: melspace@my-dejanews.com
Subject: using perl to pass flags from checkboxes to database file
Message-Id: <6oiu8s$g6n$1@nnrp1.dejanews.com>
I am creating a web-based application that is gathering information from a
specific set of users using checkboxes, and writing that information to a
flat ASCII database file. I am trying to write a 0 to the file if it is not
checked, and a 1 if it is checked. I am using post, and actually loading the
user's information from the database on the fly. The user changes and
updates information as needed, and resubmits the information. Unfortunately,
I can't seem to get it working. It will pass the "on" value for those boxes
that are checked, but it is not passing an "off" value for those that aren't
checked. When written to the file, it is stored in the wrong place because
there are no 0's written at all. Then the next time the page is generated,
the first couple of boxes come up checked, instead of the correct boxes.
Here is an example:
if ($info eq "info")
{
$count++;
if ($usr_info[$count] == 1)
{
print "<tr><td valign=top width=30%>";
print "<input type=checkbox name='$usr_info[$count]' checked>";
print "$user_type</td>";
print "<td valign=top width=70%>$description</td></tr>";
}
else
{
print "<tr><td valign=top width=30%>";
print "<input type=checkbox name='$usr_info[$count]'> $user_type</td>";
print "<td valign=top width=70%>$description</td></tr>";
}
}
Any ideas???
Thanks,
Melanie
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: 15 Jul 1998 19:31:27 GMT
From: Stefaan.Eeckels@ecc.lu (Stefaan A Eeckels)
Subject: Re: Win32 - SMTP
Message-Id: <6oj02f$m7c$1@justus.ecc.lu>
In article <35AB9CEC.528F9E26@sirius.com>,
Jim Bowlin <bowlin@sirius.com> writes:
> photuris wrote:
>>
>> I am using ActiveState's Perl for Win32 ...
>> what is the best way to have a script generate an
>> email using SMTP?
>>
>> Thanks,
>
> I have heard some people report problems trying to
> use SMTP with ActiveState as CGI. It seemed to be
> that sockets were not getting closed properly.
I have noticed that using Net::FTP with the standard
distribution (5.004_2, Net version 1.0605) also
results in file handle leakage - after a number of
ftp open/close actions perl crashes. Using
nthandleex shows 2 unnamed file handles remaining
open after each iteration. The same test program
under Linux runs for ages without any resource
leaks. Associated with the file handles is an
increase in memory usage of about 4k every 2-3
iterations.
--
Stefaan
--
PGP key available from PGP key servers (http://www.pgp.net/pgpnet/)
___________________________________________________________________
Perfection is reached, not when there is no longer anything to add,
but when there is no longer anything to take away. -- Saint-Exupery
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3168
**************************************
