[7018] in Perl-Users-Digest
Perl-Users Digest, Issue: 643 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jun 22 01:07:19 1997
Date: Sat, 21 Jun 97 22:00:16 -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 Sat, 21 Jun 1997 Volume: 8 Number: 643
Today's topics:
Re: Displaying a Web Site Tree? (Steffen Beyer)
Re: Help: Opening a pipe to a non-ending process. (Andrew M. Langmead)
Re: Networking: does Perl know ICMP? (Paul Marquess)
Re: Perl 5.004 configure problem before Linux compile (comet)
Recursion <amerar@unsu.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 21 Jun 1997 07:22:43 GMT
From: sb@en.muc.de (Steffen Beyer)
Subject: Re: Displaying a Web Site Tree?
Message-Id: <5ofvg3$ejr$1@en1.engelschall.com>
> > Does anyone know of a program or script (preferably in Perl) that I can
> > use on our Unix web server to give a tree-like display of the web site?
> > It would take an index file and recursively branch off with each local
> > html file it finds referenced.
> > Rick Barkhouse <rbarkhou@rc.gc.ca>
> > Data Administration Specialist
> > Revenue Canada, Internet Services Division - IHID
> > Work: 613.952.0189
My (Perl) script "gen_tree" does exactly this.
You can download it from my web site at
http://www.engelschall.com/u/sb/download/
Hope this helps.
Yours,
--
Steffen Beyer <sb@sdm.de> http://www.engelschall.com/u/sb/
"There is enough for the need of everyone in this world,
but not for the greed of everyone." - Mahatma Gandhi
>> Unsolicited commercial email goes directly to /dev/null <<
------------------------------
Date: Sat, 21 Jun 1997 13:56:03 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: Help: Opening a pipe to a non-ending process.
Message-Id: <EC4pDF.1I2@world.std.com>
hankster <hankster@magmacom.com> writes:
>Earlier I posted a message asking why I was unable to read the output
>from an open process using a pipe. I found out that the reason why is
>because the process I opened never finishes (It's supposed to be like
>that) and the parent blocks until the child finishes, therefor the
>parent never gets to continue running.
>I'm wondering now, how do I open that process for reading without
>hanging my parent process up while it waits for the child to compleate.
The problem is that perl (and the C libraries perl is built on) often
buffer output. Especially when the output device isn't a
terminal. Ending a program is one way to flush output buffers, but
sometimes the side effects make it an inconvenient method to use.
You tell perl to flush the buffers of a filehandle after every output
function (print, write, etc.) by using autoflush method on the
filehandle:
use FileHandle;
STDOUT->autoflush(1);
--
Andrew Langmead
------------------------------
Date: 21 Jun 1997 13:35:15 GMT
From: pmarquess@bfsec.bt.co.uk (Paul Marquess)
Subject: Re: Networking: does Perl know ICMP?
Message-Id: <5oglaj$ng2$1@pheidippides.axion.bt.co.uk>
Grant Miller (grant@statler.cc.wwu.edu) wrote:
: Hello,
: I am looking to write a ping client in Perl that does ping over ICMP
: (Internet Control Message Protocol) and I am having problems getting it
: to work. The first question I have is: Does perl support the ICMP protocol?
: I have used the pingecho() function in the Net::Ping library and that
: ping uses TCP and it doesn't report back properly for Windows boxes.
: That's why I'm trying to write a ping client by hand to work over ICMP.
The latest version of the Perl ping module can handle ICMP. Available
in 5.004 or CPAN.
Paul
------------------------------
Date: 21 Jun 1997 12:20:57 GMT
From: comet@slip.net (comet)
Subject: Re: Perl 5.004 configure problem before Linux compile
Message-Id: <5oggv9$81a$2@owl.slip.net>
Bob Berman (rjberman@mindspring.com) wrote:
:I have gcc 2.7.2.1 and ld.so 1.9.2 on a Linux 2.0.29 system. While running
:./Configure to build perl 5.004, it bombs out telling me it can't find -ldl when
:it tries to compile try.c. The problem seems to be that, in fact, I do not have
:a static library libdl.a. Apparently ld.so 1.9.2 does not build one. I do have
:the proper shared lib and link in /lib.
:
:If I remove -ldl from the list of libraries, everything goes OK until Perl's
:configure discovers that I do not have dld.h either! Well, it's not in the ld.so
:distribution. So what do I need to do to get perl to build on my Linux system?
:Why does it need to statically link with libs such as libm, libgdbm etc, anyway?
:What's wrong with using the shared lib versions of those?
:
:I checked an old distribution of ld.so I had around - 1.7.3 or soemthing like
:that - and that didn't have the missing header file either. I do have a working
:version of Perl 5.002 although I forget how I got that to build, but it seems
:that that went fairly smoothly at the time. Could someone please enlighten me?
:I'm sure this is not an original problem.
I'm not sure what the problem is but I had the exact same problem using
my Slackware 3.0 release with Linux 2.0.24
And I was able to "fix" it (with a shotgun...)
Here is what I did:
1) ftp to ftp.cdrom.com
2) get the file /pub/linux/slackware-3.2/patches/svcpack02.tgz
3) get the file /pub/linux/slackware-3.2/patches/README.svcpack02
4) read the README.svcpack02 and
list the files that are in the service pack:
tar -tvf svcpack02.tgz | more
5) make backup copies of files that you do not want clobbered
(for example: /usr/X11/lib/X11/fvwm/system.fvwmrc )
6) logon your system as root and install the service pack:
installpkg svcpak02.tgz
This loaded a bunch of files onto my system and made the -ldl option of
the gcc compiler work.
For gcc 2.7.2 and the -O2 option, there is a optimization bug and I added the
-fno-strength-reduce option to fix it. (This is documented in the GCC FAQ)
-Rick Narron
comet@slip.net
------------------------------
Date: Sat, 21 Jun 1997 00:38:13 -0500
From: Arthur Merar <amerar@unsu.com>
Subject: Recursion
Message-Id: <33AB68C5.7978@unsu.com>
I also posted this in the CGI group. But maybe someone can help me
here:
Hello,
I have a CGI program that reads in an HTML file and prints it to the
screen. It also generates a gif, then prints some more HTML.
Basically, this is my page:
Content-Type: multipart/mixed;boundary=--BoundaryString\n\n
\n
--BoundaryString\n
Content-Type: text/html\n\n
HTML Data\n
\n
--BoundaryString\n
Content-Type: image/gif\n\n
GIF Data\n
\n
--BoundaryString\n
Content-Type: text/html\n\n
HTML Data\n
--BoundaryString--
However, the script clears the screen between the first and second
'BoundryString'. And, it ignores the third set of HTML.
Someone suggested CGI Recursion. I do not know how to do this. Can
someone help me please? How do I do CGI Recursion?
Thanks,
Arthur
amerar@unsu.com
http://www.unsu.com
------------------------------
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 643
*************************************
