[8072] in Perl-Users-Digest
Perl-Users Digest, Issue: 1691 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jan 21 11:17:35 1998
Date: Wed, 21 Jan 98 07:00:27 -0800
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, 21 Jan 1998 Volume: 8 Number: 1691
Today's topics:
Re: Byte Ordering using Perl (Chris Cladingboel)
CNN - Scientists produce first cross between camel and <rets@meta3.com>
Re: Daemon for connection with Oracle <Jacqui.Caren@ig.co.uk>
Re: Debugger?? <74331.3261@CompuServe.COM>
Re: Email Autoresponder (Clay Irving)
Re: FAQ too big (Was: Re: PERL forking) <earlw@kodak.com>
Re: FAQ too big (Was: Re: PERL forking) <ajohnson@gpu.srv.ualberta.ca>
Re: FAQ too big (Was: Re: PERL forking) <clark@s3i.com>
Re: Freidl's book mystery (Andreas Karrer)
Re: How to do random pornography in Perl. <74331.3261@CompuServe.COM>
Re: HTTP debugger. Does that exist? (Nathan V. Patwardhan)
Re: I need some help pleeze <clark@s3i.com>
New DBD-Oracle <scarpa@mall.it>
Re: Oraperl problem <Jacqui.Caren@ig.co.uk>
Perl - Oracle <scarpa@mall.it>
Re: perl -- a language for LEARNING programming? <jjfink@searle.monsanto.com>
Re: Puzzling behavior of c.l.p.* readers (Chris Nandor)
Re: Puzzling behavior of c.l.p.* readers (Chris Nandor)
Re: readdir problem <qdtcall@esb.ericsson.se>
Re: trying to install FCGI(problem with sfio) <marius@ace.funcom.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 21 Jan 1998 14:17:48 GMT
From: chris@plato.wadham.ox.ac.uk (Chris Cladingboel)
Subject: Re: Byte Ordering using Perl
Message-Id: <6a502c$2cs$1@news.ox.ac.uk>
biju@mindless.com wrote:
> I have a problem of byte ordering on NT using Perl.
I've just tried:
$value = 0x09c80000;
$value = ($value >> 24) | ($value >> 8) & 0xff00 |
($value << 8) & 0xff0000 | ($value << 24);
printf "0x%08x\n", $value;
and that gives the expected result, under both NT and Linux. Note the
additional `>> 8' that you forgot, but that doesn't account for the
answer that you got.
> Is there is any efficient way of swapping the bytes on NT using Perl.
There's bound to be a better way, but hey, that's perl!
Chris.
--
| Chris Cladingboel. Computer Manager, Wadham College, Oxford, OX1 3PN |
| computer.manager@wadham.ox.ac.uk Tel: 01865 277594 |
| http://www.wadham.ox.ac.uk/~chris/ Fax: 01865 277937 |
------------------------------
Date: Wed, 21 Jan 1998 08:23:53 -0600
From: Ken Holm <rets@meta3.com>
Subject: CNN - Scientists produce first cross between camel and llama - January 20, 1998
Message-Id: <34C604F9.167E@meta3.com>
This is a multi-part message in MIME format.
--------------2781446B794B
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
AN interesting note.
http://www.cnn.com/EARTH/9801/20/cama.ap/index.html
--
Kennneth A Holm | META 3 - Webmaster |webmaster@meta3.com
PO Box 1508 |----------------------------------|(601)718.1030 phone
Jackson, MS 39215|PGP Key finger webmaster@meta3.com|(601)948.5999 (fax)
--------------2781446B794B
Content-Type: text/html; charset=us-ascii; name="index.html"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline; filename="index.html"
Content-Base: "http://www.cnn.com/EARTH/9801/20/cama.
ap/index.html"
<BASE HREF="http://www.cnn.com/EARTH/9801/20/cama.ap/index.html">
<HTML>
<HEAD>
<TITLE>CNN - Scientists produce first cross between camel and llama - January 20, 1998</TITLE>
</HEAD>
<!-- Writer: dr -->
<!-- AP: dr -->
<!-- Copy editor: sg -->
<!-- Web editor: fj -->
<!-- Sysop: vr -->
<BODY BGCOLOR="#FFFFFF" BACKGROUND="/images/9607/bgbar.gif" LINK="#0A3990" ALINK="#FF0000" VLINK="#FF0000">
<TABLE WIDTH=600 BORDER=0>
<!--========== NAVIGATION ================-->
<TR>
<TD WIDTH=118 VALIGN=TOP ALIGN=LEFT>
<A HREF="/index.html" NAME="#top"><IMG SRC="/images/9607/cnn_logo.gif" ALT="CNN logo" ALIGN=RIGHT WIDTH="103" HEIGHT="80" BORDER="0" HSPACE="11"></A>
<BR CLEAR=ALL>
<A HREF="/MAPS/9712/nav/basic.map"><IMG SRC="/images/9712/nav/nav.earth.gif" ALT="Navigation" ALIGN=LEFT WIDTH="110" HEIGHT="311" BORDER="0" HSPACE="8" ISMAP USEMAP="#nav.map"></A><BR CLEAR=ALL>
<TABLE CELLSPACING="0" CELLPADDING="0" WIDTH=96 BORDER=0 ALIGN=LEFT>
<TR>
<!-- Community -->
<TD ROWSPAN=9 WIDTH=10> </TD>
<TR><TD WIDTH="86" BGCOLOR="#000000" ALIGN=RIGHT VALIGN=TOP><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">COMMUNITY </FONT></TD></TR><TR><TD WIDTH="86" BGCOLOR="#6363CE" ALIGN=RIGHT VALIGN=TOP><A HREF="/boards/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Message Boards</FONT></A> <BR><A HREF="/chat/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Chat</FONT></A> <BR><A HREF="/feedback/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Feedback</FONT></A> <BR><BR></TD></TR>
<!-- Site Sources -->
<TR><TD WIDTH="86" BGCOLOR="#000000" ALIGN=RIGHT VALIGN=TOP><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">SITE SOURCES </FONT></TD></TR><TR><TD WIDTH="86" BGCOLOR="#6363CE" ALIGN=RIGHT VALIGN=TOP><A HREF="/INDEX/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Contents</FONT></A> <BR><A HREF="/feedback/help/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Help!</FONT></A> <BR><A HREF="/SEARCH/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Search</FONT></A> <BR><A HREF="/CNN/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">CNN Networks</A></FONT> <BR><BR></TD></TR>
<!-- Specials -->
<TR><TD BGCOLOR="#000000" WIDTH=86 ALIGN=RIGHT VALIGN=TOP><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">SPECIALS </FONT></TD></TR><TR><TD WIDTH="86" BGCOLOR="#6363CE" ALIGN=RIGHT VALIGN=TOP><A HREF="/QUICKNEWS/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Quick News</FONT></A> <BR><A HREF="/almanac/daily/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Almanac</FONT></A> <BR><A HREF="/video_vault/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">Video Vault</FONT></A> <BR><A HREF="/SEARCH/quiz/"><FONT COLOR="#FFFFFF" SIZE=1 FACE="HELVETICA, ARIAL">News Quiz</FONT></A> <BR></TD></TR>
</TR>
</TABLE>
<map name="nav.map">
<area shape="rect" coords="4, 52, 110, 69"
href="/US/">
<area shape="rect" coords="4, 291, 89, 308"
href="/cnnes/">
<area shape="rect" coords="4, 273, 88, 290"
href="/cnnfn/">
<area shape="rect" coords="4, 255, 88, 272"
href="/allpolitics/">
<area shape="rect" coords="4, 237, 88, 254"
href="/cnnsi/">
<area shape="rect" coords="4, 214, 110, 231"
href="/EARTH/">
<area shape="rect" coords="4, 195, 110, 213"
href="/HEALTH/">
<area shape="rect" coords="4, 178, 110, 195"
href="/SHOWBIZ/">
<area shape="rect" coords="4, 160, 110, 177"
href="/STYLE/">
<area shape="rect" coords="4, 141, 110, 159"
href="/TRAVEL/">
<area shape="rect" coords="4, 123, 110, 141"
href="/TECH/">
<area shape="rect" coords="4, 105, 110, 123"
href="/cnnsi/">
<area shape="rect" coords="4, 88, 110, 105"
href="/WEATHER/">
<area shape="rect" coords="4, 69, 110, 87"
href="/LOCAL/">
<area shape="rect" coords="4, 34, 110, 51"
href="/WORLD/">
<area shape="rect" coords="4, 1, 110, 29"
href="http://cnn.com/customnews">
</map>
<BR CLEAR=ALL><BR>
<!--/NAVIGATION-->
<!-- search -->
<A HREF="/MAPS/9704/explore.map"><IMG SRC="/images/9801/explore.ads/explore.earth.gif" ALT="Infoseek/Big Yellow" ALIGN=RIGHT WIDTH="106" HEIGHT="107" HSPACE=10 BORDER=0 ISMAP></A>
<BR CLEAR=ALL><BR><BR CLEAR=ALL>
<!-- /search -->
<!-- spotlight -->
<A HREF="/MAPS/9704/spotlight.map"><IMG SRC="/images/9705/pathnet.warner.gif" ALT="Pathfinder/Warner Bros" ALIGN=RIGHT WIDTH="106" HEIGHT="104" HSPACE=10 BORDER=0 ISMAP></A>
<BR CLEAR=ALL><BR><BR CLEAR=ALL>
<!-- /spotlight -->
<!-- barnesandnoble -->
<A HREF="http://barnesandnoble.bfast.com/booklink/click?sourceid=11764&categoryid=cnnsearch"><IMG SRC="/images/9710/book.search.gif" ALIGN=RIGHT ALT="Barnes and Noble" WIDTH=106 HEIGHT=104 HSPACE=10 BORDER=0></A><BR>
<BR CLEAR=ALL><BR><BR CLEAR=ALL>
<!-- /barnesandnoble -->
</TD>
<TD WIDTH=482 VALIGN=TOP>
<!--=========================-->
<TABLE BORDER=0>
<TR>
<TD WIDTH=220 ALIGN=RIGHT>
<IMG SRC="/EARTH/images/9702/earth_halfbanner.gif" ALT="Earth banner" WIDTH="187" HEIGHT="60" BORDER="0">
</TD>
<TD WIDTH=260>
<A HREF="/event.ng/Type=click&RunID=7645&ProfileID=41&AdID=3960&GroupID=32&FamilyID=727&TagValues=240.434&Redirect=http:%2F%2Fcnn.com%2Fads%2Fadvertiser%2Ftoyota%2F9712%2F1996.html"><img src="/ads/advertiser/toyota/9712/lg1996.gif" border=1 width="234" height="60" alt=""></a>
</TD>
</TR>
</TABLE>
<CENTER>
<IMG SRC="/images/9607/hr.gif" ALT="rule" WIDTH="430" HEIGHT="3">
</CENTER><BR>
<BLOCKQUOTE>
<!--========================================================-->
<!--============== Paste stories below here ================-->
<!--========================================================-->
<H1>Scientists produce first cross between camel and llama</H1>
<TABLE ALIGN=RIGHT CELLPADDING=0 CELLSPACING=0 BORDER=0 HSPACE="5" VSPACE="5" WIDTH=176>
<TR><TD colspan=2>
<!--===========IMAGE============-->
<A HREF="rama_large.jpg"><IMG SRC="rama.ap.jpg" ALT="Rama and doctor" ALIGN=TOP WIDTH="176" HEIGHT="132" BORDER="0"></A>
<!--===========/IMAGE===========-->
</TD></TR>
<TR>
<TD width="90%">
<FONT SIZE="-2" FACE="helvetica, arial">
<B>
<!--===========CAPTION==========-->
Dr. Lulu Skidmore with Rama, who was born last week at the Camel Reproduction Center in Dubai
<!--===========/CAPTION=========-->
</B>
</FONT>
</TD><TD width="10%"> </TD>
</TR></TABLE>
<!-- date -->
<FONT SIZE="1">January 20, 1998<br>
Web posted at: 6:37 p.m. EST (2337 GMT)</FONT>
<!-- /date -->
<P>
DUBAI, United Arab Emirates (AP) -- It's been a bumpy ride, but Rama the Cama -- the offspring of a camel and its Andean cousin, the llama -- has brought together what 30 million years of evolution and continental drift rent asunder.
</P>
<P>
Scientists in the Emirates said Tuesday that it took two years to perfect the artificial insemination technique necessary to breed Rama's llama mom, a petite 165 pounds, with his overwhelming dad, who weighs in at 990 pounds.
</P>
<P>
The male animal was born last Wednesday, said Dr. Lulu Skidmore, a specialist in camel reproduction. It weighed 12 pounds at birth.
</P>
<P>
"We hope it will have the best qualities of both animals,"
said Skidmore, technical director of the Camel Reproduction Center in Dubai. "In size, it's somewhere between a camel and a llama."
</P>
<P>
The newborn has the short ears and long tail of a camel, but the cloven hooves of a llama, distinct from the single footpad of the camel. He was born, too, without his father's hump.
</P>
<TABLE ALIGN=LEFT CELLPADDING=0 CELLSPACING=0 BORDER=0 HSPACE="5" VSPACE="5" WIDTH=175>
<TR><TD colspan=2>
<!--===========IMAGE============-->
<IMG SRC="cama.ap.jpg" ALT="Rama and doctor" ALIGN=TOP WIDTH="175" HEIGHT="133" BORDER="0">
<!--===========/IMAGE===========-->
</TD></TR>
<TR>
<TD width="90%">
<FONT SIZE="-2" FACE="helvetica, arial">
<B>
<!--===========CAPTION==========-->
According to Skidmore, Rama should be more mild-mannered than his camel ancestors
<!--===========/CAPTION=========-->
</B>
</FONT>
</TD><TD width="10%"> </TD>
</TR></TABLE>
<P>
For now, he is being bottle-fed on camel's milk. "If we can combine the best qualities of both animals, we can have a super animal," said Skidmore, a British citizen.
</P>
<P>
She said the cama should have the prized fleece of the llama,
native to the South American Andes, but because of its larger size it should give more wool.
</P>
<P>
"In temperament it should also be calmer than a camel, and
therefore better suited as a track animal," Skidmore said.
</P>
<P>
The camel and the llama descend from a species that lived about 30 million years ago.
</P>
<p><em>Copyright 1998 The <A HREF="/interactive_legal.html#AP">Associated Press</A>. All rights reserved. This material may not be published, broadcast, rewritten, or redistributed.</em></p>
<!--========================================================-->
<!--============== Paste stories above here ================-->
<!--========================================================-->
</BLOCKQUOTE>
<A NAME="links"> </A>
<BR clear="all">
<!-- ============================================-->
<!-- ================= Relateds =================-->
<!-- ============================================-->
<CENTER>
<IMG SRC="/images/9607/hr.gif" ALT="rule" WIDTH="430" HEIGHT="3">
</CENTER>
<BLOCKQUOTE>
<H3>Related sites:</H3><EM><FONT SIZE="2">Note: Pages will open in a new browser window</FONT></EM>
<UL>
<LI><A HREF="http://www.dubai-online.com/" TARGET="NEW">Dubai Online</A>
<LI><A HREF="http://www.uaeinteract.com/" TARGET="NEW">UAE interact</A>
<LI><A HREF="http://www.selu.com/~bio/wildlife/" TARGET="NEW">Wildlife Web</A>
<ul><LI><A HREF="http://www.selu.com/~bio/wildlife/links/animals/mammals.html" TARGET="NEW">Wildlife Links - Mammals</A></ul>
</UL>
<CENTER>
<P><EM>External sites are not endorsed by CNN Interactive.</EM></P>
</CENTER>
<!-- ============================================-->
<!-- ================= Relateds =================-->
<!-- ============================================-->
</BLOCKQUOTE>
<!--======================= search =========================-->
<CENTER>
<HR WIDTH=430 NOSHADE>
<font face="helvetica,arial" size="1">
<form name=seek method=GET action="http://search.cnn.com:8765/query.html">
<A HREF="http://search.cnn.com"><IMG SRC="/images/9706/infoseek.sm.gif" ALT="Infoseek search" ALIGN=ABSMIDDLE WIDTH="83" HEIGHT="23" BORDER="0"></A>
<input type=text name=qt size=20 value="" maxlength=50><!--txt here only-->
<input type=hidden name=qc value="">
<input type=hidden name=col value="cnni">
<input type=hidden name=qm value="0">
<input type=hidden name=st value="1">
<input type=hidden name=nh value="10">
<input type=hidden name=lk value="1">
<input type=hidden name=rf value="1">
<input type=submit name=go value="seek"> <input type=submit name=help value="help">
</form>
</font>
<HR WIDTH=430 NOSHADE>
<br clear="all">
</CENTER>
<!--======================= search =========================-->
<CENTER>
<IMG SRC="/images/9607/hr.gif" ALT="rule" WIDTH="430" HEIGHT="3">
<TABLE BORDER="0" CELLSPACING="0" CELLPADDING=5>
<TR><TD>
<A HREF="/community/"><IMG SRC="/images/9704/plus_message.gif" ALT="Message Boards" ALIGN=LEFT WIDTH="60" HEIGHT="59" BORDER=0></A>
</TD><TD>
<A HREF="/community/">Sound off on our<BR>message boards & chat</A><BR><BR>
</TD><TD>
<IMG SRC="/images/9607/dot.gif" ALIGN=TOP WIDTH="1" HEIGHT="70" BORDER="0">
</TD><TD>
<A HREF="/event.ng/Type=click&RunID=7645&ProfileID=41&AdID=3960&GroupID=32&FamilyID=727&TagValues=240.434&Redirect=http:%2F%2Fcnn.com%2Fads%2Fadvertiser%2Ftoyota%2F9712%2F1996.html"><img src="/ads/advertiser/toyota/9712/lg1996.gif" border=1 width="234" height="60" alt=""></a>
</TD></TR>
</TABLE>
<IMG SRC="/images/9607/hr.gif" ALT="rule" WIDTH="430" HEIGHT="3">
<BR CLEAR=ALL>
</TD>
</TR>
</TABLE>
<CENTER>
<BR CLEAR=ALL>
<A HREF="#top"><IMG SRC="/images/9607/back_to_top.gif" ALT="To the top" WIDTH="87" HEIGHT="45" BORDER=0></A>
<P>© 1998 Cable News Network, Inc.<BR>
All Rights Reserved.</P>
<H6><A HREF="/interactive_legal.html">Terms</A> under which this
service is provided to you.</H6>
</CENTER>
</BODY>
</HTML>
--------------2781446B794B--
------------------------------
Date: Wed, 21 Jan 1998 13:02:39 GMT
From: Jacqui Caren <Jacqui.Caren@ig.co.uk>
Subject: Re: Daemon for connection with Oracle
Message-Id: <En4xKG.30x@ig.co.uk>
In article <34C35ED0.F48703F1@mint.se>, Mattias Niklasson <mn@mint.se> wrote:
>Hello,
>
>We are using Perl, as CGI, to create a GUI to modify data in a Oracle
>database using the Oraperl module. The problem is that each execution of
>a script using DB access makes a new connection to the DB, which takes
>about 5 seconds. Therefor the GUI feels slow.
>
>Now to my question; we are planing to develope a daemon which handles
>the DB connections, and keeping them alive to reduce the responstime.
>How do you recommend that we solve the communication between out CGI
>scripts and the daemon? Is RPC the right way to go?
>
>Is there a simular product/module on the market already?
This (in the ciwa.cgi group) is a very FAQ :-)
The answer is that with perl you can do this in many ways....
i.e.
CGI::MiniSvr - has a process per session overhead.
Apache::CGI and Apache::DBI - has a per apache thread oracle connection cache.
FastCGI provides a backend process.
HTTP::Daemon - see Randals webtechniques column on this very subject!
(Randal - please supply your URLs again - I have lost the details - again!)
I have one test machine that has limited memory and a largish SGA so as
to intentionally make new connections slow... The machine takes
around 5-10 seconds to process a CGI only application. The same
functionality is sub-second using Apache::CGI/DBI...
These figures are based over approx 200 runs on a machine that only I
use - no other operations in progress and no other activitues such as
X window managers (accessed though telnet/rlogin only) etc...
Apache:;CGI is the most flexible option but requires good perl programming
skills and a good understanding of Apache, mod_perl and related issues.
Saying this it is not difficult to start with.
There are even some template engines implemented as mod_perl handlers
that provide the ability to embed perl into pages, used with Apache::DBI
these may be the quickest way to get started using persistent connections...
Have fun,
Jacqui
--
Jacqui Caren Email: Jacqui.Caren@ig.co.uk
Paul Ingram Group Fax: +44 1483 419 419
140A High Street Phone: +44 1483 424 424
Godalming GU7 1AB United Kingdom
------------------------------
Date: Wed, 21 Jan 1998 08:40:37 -0500
From: Terry Michaels <74331.3261@CompuServe.COM>
Subject: Re: Debugger??
Message-Id: <ecvNpInJ9GA.316@nih2naac.prod2.compuserve.com>
In the latest issue of The Perl Journal, under Perl News
is a notice of
Logos Research Systems offers a free GUI debugger for
Win32 at http://www.logos.com.perl.
I don't think this will be available until some time in
February, but it looks promising.
Terry Michaels
------------------------------
Date: 21 Jan 1998 09:41:31 -0500
From: clay@panix.com (Clay Irving)
Subject: Re: Email Autoresponder
Message-Id: <6a51er$qu6@panix.com>
In <6a3oip$gr5$1@loomi.telstra.net> "Michael Slater" <mikey@iexpress.net.au> writes:
> Anybody know of an Email Autoresponder script written perl, and where
>it can be obtained from.
Look in the mail and USENET news section of Perl Reference:
http://reference.perl.com/query.cgi?mail
--
Clay Irving <clay@panix.com> I think, therefore I am. I think?
http://www.panix.com/~clay/
------------------------------
Date: Wed, 21 Jan 1998 08:54:16 -0500
From: Earl Westerlund <earlw@kodak.com>
Subject: Re: FAQ too big (Was: Re: PERL forking)
Message-Id: <34C5FE08.5953@kodak.com>
Bart Lateur wrote:
>
> "Kevin Hawley" <cbpkxh@arcochem.com> wrote:
>
> >I don't have 40 years to read the FAQ.
>
> >> On Mon, 19 Jan 1998, ARCO Chemical Company wrote:
> >>
> >> > P.S. The Perl FAQ is TOO big!!
>
> Hmmm... What I think is lacking, is an overview of everything that is
> covered in the FAQ. A TOC, a list with ALL the questions and where the
> answers can be found.
>
> Not everybody uses Unix, where you can use grep to look it up for you...
> On a PC, you have to (manually) open and search through 9 documents.
>
> Bart.
I'm a relative newbie, and I've found the FAQ invaluable. I use NT, and
I go to into my browser, open d:/perl/html/lib/Pod/perlfaq.html, and go
from there.
--
+-----------------+----------------------------------------+
| Earl Westerlund | Kodak's Homepage: http://www.kodak.com |
+-----------------+----------------------------------------+
| The opinions expressed herein are mine and mine alone |
| (most people don't seem to want them anyway) |
+----------------------------------------------------------+
------------------------------
Date: Wed, 21 Jan 1998 07:43:14 -0600
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: FAQ too big (Was: Re: PERL forking)
Message-Id: <34C5FB72.548A74E@gpu.srv.ualberta.ca>
Bart Lateur wrote:
!
! "Kevin Hawley" <cbpkxh@arcochem.com> wrote:
!
! >I don't have 40 years to read the FAQ.
!
! >> On Mon, 19 Jan 1998, ARCO Chemical Company wrote:
! >>
! >> > P.S. The Perl FAQ is TOO big!!
!
! Hmmm... What I think is lacking, is an overview of everything that is
! covered in the FAQ. A TOC, a list with ALL the questions and where the
! answers can be found.
!
! Not everybody uses Unix, where you can use grep to look it up for
you...
! On a PC, you have to (manually) open and search through 9 documents.
!
! Bart.
!
hmm, the 'perltoc' manpage has been around for quite some time
on unix distributions--- does it (or its equivalent) not come
with other distributions???
Also, perl is very good for writing 'grep' type scripts...why not
write yourself a script that greps through the .pod files?
regards
andrew
------------------------------
Date: 21 Jan 1998 09:04:03 -0500
From: Clark Dorman <clark@s3i.com>
Subject: Re: FAQ too big (Was: Re: PERL forking)
Message-Id: <dwwft6i0c.fsf@elmo.s3i.com>
bart.mediamind@tornado.be (Bart Lateur) writes:
> "Kevin Hawley" <cbpkxh@arcochem.com> wrote:
>
> >I don't have 40 years to read the FAQ.
>
> >> On Mon, 19 Jan 1998, ARCO Chemical Company wrote:
> >>
> >> > P.S. The Perl FAQ is TOO big!!
>
> Hmmm... What I think is lacking, is an overview of everything that is
> covered in the FAQ. A TOC, a list with ALL the questions and where the
> answers can be found.
>
> Not everybody uses Unix, where you can use grep to look it up for you...
> On a PC, you have to (manually) open and search through 9 documents.
On a PC machine, have a copy of the faq on your machine in html format
(the one with it all the questions and answers in one file). Use
netscape (Death to IE!) to open it and do a Find. Works for me.
Better yet, make a perl program that reads in keywords and searches
and displays the questions/answers from the faq related to those
keywords.
Download and save:
ftp://ftp.cdrom.com/pub/perl/CPAN/doc/FAQs/FAQ/PerlFAQ.html
or
http://www.perl.com/CPAN-local/doc/FAQs/FAQ/PerlFAQ.html
--
Clark Dorman "Evolution is cleverer than you are."
http://cns-web.bu.edu/pub/dorman/D.html -Francis Crick
------------------------------
Date: 21 Jan 1998 14:00:23 GMT
From: karrer@ife.ee.ethz.ch (Andreas Karrer)
Subject: Re: Freidl's book mystery
Message-Id: <slrn6cbvsg.hu3.karrer@kuru.ee.ethz.ch>
In article <6a4mas$she$1@home.kpbank.ru>, Vladimir Sovetov wrote:
> Please, is anyone here kind enough to explain to me what Mr. Friedl is
> trying to make me understand when he spend thousands of words
> on C /* ... */ comments problem (pp. 168-173)?
pp. 168-173 are in chapter 5, which is not specific to perl, but about
regex in general -- and only Perl has the non-greedy *? construct.
p. 292 (in chapter 7, which IS about Perl) mentions the FAQ regex
(/\*.*?\*/), but says that it is slower. Your tests seem to
contradict this.
- Andi
------------------------------
Date: Wed, 21 Jan 1998 08:47:08 -0500
From: Terry Michaels <74331.3261@CompuServe.COM>
Subject: Re: How to do random pornography in Perl.
Message-Id: <OWw4RMnJ9GA.279@nih2naac.prod2.compuserve.com>
Pronography is what you graduate to after you
get tired of pornography.
;>)
------------------------------
Date: 21 Jan 1998 14:20:16 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: HTTP debugger. Does that exist?
Message-Id: <6a5070$61s@fridge.shore.net>
Craig (craig@skybound.demon.nl) wrote:
: I'm looking for a program to view all the HTTP communication between my
: browser and my server to see what my CGI scripts and browser are really
: doing. Does something like that exist?
Get LWP. http://www.perl.com/CPAN/modules/by-module/LWP/
--
Nathan V. Patwardhan
------------------------------
Date: 21 Jan 1998 09:46:31 -0500
From: Clark Dorman <clark@s3i.com>
Subject: Re: I need some help pleeze
Message-Id: <dvhvd6g1k.fsf@elmo.s3i.com>
Tom Phoenix <rootbeer@teleport.com> writes:
> On 20 Jan 1998, David Waring wrote:
>
> > Just wondering, what is the == doing when comparing two strings?
>
> It's a numeric comparison, so it doesn't compare two strings. The strings
> are converted first to numbers. "F" converts to zero (but can give a
> warning). Hope this helps!
Ok, but why does "F" convert to zero? Someone else wrote that it uses
atof, which makes sense for numbers in text strings, but surely there
is a way to uniquely convert a character string into a number.
A way to do it would be to concatenate the ascii values, ignoring
leading zeros, using ord(). As long as it is consistent, using a
conversion method would be better than what normally happens above,
which is that it always tests true.
Before you say that it can't be done, Perl has plenty of magic in
other places, so why not here? If I have the variable $letter = "e"
and I do $letter++, I get "j". I can't believe that converting a
character string into a number would be any more difficult.
--
Clark
------------------------------
Date: Wed, 21 Jan 1998 15:32:51 +0100
From: Daniele Scarpa <scarpa@mall.it>
Subject: New DBD-Oracle
Message-Id: <34C60713.DEFD6D59@mall.it>
I have these software: Perl 5.003 , Oracle 7.311 , os Irix 6.4
I want to install interface Perl -Oracle. I have
perl-dbd-oracle-0.47.tar.gz and perl-dbi-0.91.tar.gz.
I have just installed perl-dbi-0.91.tar.gz and it seems Ok.
I have problems with perl-dbd-oracle-0.47.tar.gz .
1) I do : perl Makefile.PL , and system produce makefile. Ok.
2) If I do : make , system answers so:
ld32: FATAL 112: cannot link old 32-bit object with -n32 link:
/data/oracle/app/oracle/product/732/lib/libclient.a(ofen.o).
*** Error code 2 (bu21)
3) I have tried : perl Makefile.PL LINKTYPE=static , so I optain the
same error in make test phase.
I have read in README.help file that for os. irix the library -n32 must
be changed with -32.
I tried to change in file makefile -n32 with -32 , but nothig, systems
answers:
d32: ERROR 33: Unresolved text symbol "boot_DBD__Oracle" -- 1st
referenced
by ./perlmain.o.
ld32: INFO 60: Output file removed because of error.
*** Error code 2 (bu21)
*** Error code 1 (bu21)
Help me !!!!!!!!
Thank you very much !!!!
daniele
------------------------------
Date: Wed, 21 Jan 1998 12:01:29 GMT
From: Jacqui Caren <Jacqui.Caren@ig.co.uk>
Subject: Re: Oraperl problem
Message-Id: <En4uqH.2uy@ig.co.uk>
[ posted and emailed ]
In article <34B536CE.1C25CD8E@lanl.gov>,
Donner Holten <donner@lanl.gov> wrote:
> I'm having problems with an oracle script. I can't seem to log onto
>oracle because the program can't find something called orlon. Any help
>would be appreciated. Thanks.
This is probably due to your version of perl4 oraperl using v6 OCI.
This is antique and unsupported (oracle and perl) software. Given that
a full oraperl emulation interface for perl5 has been available for
years and no bugfixes have been made to perl4 or oraperl for perl4
during this time you want to seriously think about moving to perl5 and
Oraperl.
>-------------------------------------
>#! /opt/oracle/src/oraperl-v2.4/oraperl -w
See http://www.hermetica.com/technologia/DBI/ for information about DBI
By adding the
use Oraperl;
line (and some minor typographical changes) your software is migrated!
>
># Specify Username
>
># $database='T:128.165.128.115/1525:pcsr';
This is sqlnet V1 - which is no longer supported.
What version of oracle are you running on?
If this is a commercial application you should start to
think about a sql*Net V1 -> V2 migration plan...
>$lda=&ora_login($database, $user_name, $passwd) || die;
use the $ora_errstr and $ora_errno variables that Oraperl
emulation interface provides for you.
># Open a cursor and execute the querry.
>
>$csr=&ora_open($lda, "select initcap(name), grp, email from phone_file
>where znu
>m = '121870'") || die;
change this to
my $csr = ora_open($lda, "select...");
die "$ora_errstr" if $ora_errno;
>@results=&ora_fetch($csr);
my (@results) = ora_fetch($csr);
you do not need the & for sub calls in perl5
remember to check $ora_errno and die $ora_errstr if it is set.
># Close a cursor and
># Disconnect the database server
>
>&ora_close($csr);
>&ora_logoff($lda);
DBI is OO, which means that when a $csr or $lda goes out of scope
it gets closed automatically. This was one really big problem with oraperl.
This means if you write a sub or code block that has the $lda or $csr
in scope and you do not pass references to it out of scope then
the $lda or $csr is closed.
i.e.
a function to create $csr and get first record then close $csr.
sub do_sql { my ($lda,$sql) = shift;
my $csr = ora_open($lda,$sql);
die "open: $sql gives $ora_errstr" if $ora_errno;
my (@rec) = ora_fetch($csr);
die "fetch: $sql gives $ora_errstr" if $ora_errno;
return \@rec;
}
to use it
my $rec = do_sql("select table_name from user_tables");
print join(", ", @$rec),"\n";
>/usr/lib/dld.sl: Unresolved symbol: orlon (code) from ./testprog1
It sounds like you are missing pro*C (OCI libs) on this machine
or have an incomplete LD_LIBRARY_PATH etc.
Or you have upgraded oracle without rebuilding your oraperl.
Also have a look at the DBI interface itself. It provides a
database independant API for accessing RDBMS and DBMS. It also
provides greater flexibility than the Oraperl emulation interface.
Jacqui
--
Jacqui Caren Email: Jacqui.Caren@ig.co.uk
Paul Ingram Group Fax: +44 1483 419 419
140A High Street Phone: +44 1483 424 424
Godalming GU7 1AB United Kingdom
------------------------------
Date: Wed, 21 Jan 1998 15:40:58 +0100
From: Daniele Scarpa <scarpa@mall.it>
Subject: Perl - Oracle
Message-Id: <34C608F9.AF7610EC@mall.it>
Ciao,
Mi ha passato il tuo indirizzo di email Rudy Triban.
Ti dico subito qual'e ' il problema:
Qui abbiamo un sistema operativo Irix 6.4 con Oracle 7.311 e Perl 5.003
Sto cercando di installare perl-dbi-0.91.tar.gz e
perl-dbd-oracle-0.47.tar.gz.
Per perl-dbi-0.91.tar.gz sembra tutto Ok.
Con perl-dbd-oracle-0.47.tar.gz. ho dei problemi.
Dopo aver configurato le variabili d'ambiente per Oracle ho eseguito :
> perl Makefile.PL
cosi' ho ottenuto il Makefile.
Se ora compilo make riscontro il seguente errore:
ld32: FATAL 112: cannot link old 32-bit object with -n32 link:
/data/oracle/app/oracle/product/732/lib/libclient.a(ofen.o).
*** Error code 2 (bu21)
errore che invece non si presenta se compilo il Makefile.PL con la
variabile LINKTYPE=static.
In questo caso pero' ottengo lo stesso errore di prima pero' nella fase
di make test.
Ho letto nel README.help che per Irix la libreria che ci da' problemi,
cioe' appunto la -n32, va rimpiazzata con la -32.
Ho modificato il Makefile di conseguenza e questi sono gli errori
segnalati in fase di make test:
d32: ERROR 33: Unresolved text symbol "boot_DBD__Oracle" -- 1st
referenced
by ./perlmain.o.
ld32: INFO 60: Output file removed because of error.
*** Error code 2 (bu21)
*** Error code 1 (bu21)
Mi sai aiutare?
Grazie
Daniele
------------------------------
Date: 21 Jan 1998 14:34:54 GMT
From: "Joel Finkle" <jjfink@searle.monsanto.com>
Subject: Re: perl -- a language for LEARNING programming?
Message-Id: <01bd2679$bc4e7a80$12322389@Joel.monsanto.com>
Steve Linberg <see@my-sig.com> wrote in article
<see-1401982343420001@pri03-029.oldcity.dca.net>...
> In article <34bd8ad2.1055207@news.wwa.com>, notsew@wwa.com wrote:
>
> > ...i'm seeking advice on
> > this: would it be worth it to back up and get these languages down,
>
> Perl will spoil you with its flexibility. I'd say learn C first. At the
> risk of incurring flames, I'd say that every professional programmer
> should know C. It's an excellent base and it will really make you
> appreciate Perl! :)
I've got to agree with Steve, here. Odds are you won't be
able to use Perl for everything (down, folks, I'm not saying that
you can't do anything in Perl, but that a project may require
maintenance, additions, etc. that would not be practical to
weld Perl modules onto it), and then you'll grumble about not
having Perl's wonderful features (oh, for even a simple split
in most languages' libraries of routines).
I'm not a C fan, but you may want to learn elementary C.
If you're working in Windows, I'd recommend Visual Basic,
because it's completely inside-out from most programming,
and you should see how to work that way too, and the skills
can immediately be leveraged into enhancing Microsoft Office
(see -- try doing that with Perl, without at least a smattering
of VBA)
Joel
------------------------------
Date: Wed, 21 Jan 1998 08:09:02 -0500
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Puzzling behavior of c.l.p.* readers
Message-Id: <pudge-2101980809020001@ppp-7.ts-1.kin.idt.net>
In article <6a0i29$20k$2@info.uah.edu>, gbacon@adtran.com (Greg Bacon) wrote:
# In article <69r62i$bm4@fridge.shore.net>,
# nvp@shore.net (Nathan V. Patwardhan) writes:
# : Well, at least nobody's mentioned Hitler or Mussolini yet. ;-)
#
# How neo-nazifascist of you to say!! :-) ** 3
Damn you, Hitler.
--
Chris Nandor pudge@pobox.com http://pudge.net/
%PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6'])
#== MacPerl: Power and Ease ==#
#== Publishing Date: Early 1998. http://www.ptf.com/macperl/ ==#
------------------------------
Date: Wed, 21 Jan 1998 08:08:58 -0500
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Puzzling behavior of c.l.p.* readers
Message-Id: <pudge-2101980808580001@ppp-7.ts-1.kin.idt.net>
In article <6a1o5e$bvc@buffalo.HL.Siemens.DE>,
Marek.Rouchal@-nospam-hl.siemens.de wrote:
# In article <6a0ifh$20k$3@info.uah.edu>, gbacon@adtran.com (Greg Bacon) writes:
# > The effect is to inconvenience others who have a legitimate reason to
# > contact you and to break what has always worked. Address munging is a
# > poor solution to an already disgusting problem.
#
# I agree, but you should accept that others maybe had bigger problems than
# you had (just guessing...) with spamming. After fighting some of the worst
# spammers with the help of their providers, my inbox is almost free of spam
# mail at last. I'd like to keep it that way.
Fine, but don't expect humans to take the time to unmunge it either. YOU
have a broken header. YOUR fault. YOUR bad. YOU are contributing even
more to the problem.
Knowing this e-mail will likely bounce,
--
Chris Nandor pudge@pobox.com http://pudge.net/
%PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6'])
#== MacPerl: Power and Ease ==#
#== Publishing Date: Early 1998. http://www.ptf.com/macperl/ ==#
------------------------------
Date: 21 Jan 1998 14:51:26 +0100
From: Calle Dybedahl <qdtcall@esb.ericsson.se>
Subject: Re: readdir problem
Message-Id: <issoqi6ild.fsf@godzilla.kiere.ericsson.se>
bart.mediamind@tornado.be (Bart Lateur) writes:
> Then, what is? I've though of storing -M $file into a hash for each
> file, and then sort them by value.
Maybe one of the gurus will come up with something better, but that's
about the way I'd do it too. Basically, the point is to reduce the
number of stat():s from two per comparison to one per file. I'd
probably make a schwartzian transform-thing out of it, though:
$dir=".";
opendir DIR,$dir or die "Can't open $dir: $!\n";
chdir $dir;
@sorted_list = map {$_->[0]}
sort { $a->[1] <=> $b->[1] }
map {[$_, -M $_]} readdir DIR;
--
Calle Dybedahl, UNIX Sysadmin
qdtcall@esavionics.se http://www.lysator.liu.se/~calle/
------------------------------
Date: 21 Jan 1998 14:01:01 +0100
From: Marius Kjeldahl <marius@ace.funcom.com>
Subject: Re: trying to install FCGI(problem with sfio)
Message-Id: <524t2yq8vm.fsf@ace.funcom.com>
>>>>> "kinlam" == kinlam <kinlam@mec.cuny.edu> writes:
kinlam> I download a modules(FCGI-0.30) from CPAN. When I try
kinlam> to install it, It give an error of "perl isn't compiled with
kinlam> perlio/sfio support. I found out from the REAME file that
kinlam> come with FCGI module that I have to configure perl with the
kinlam> following option './Configure -Duseperlio -Dusesfio'. So, I
kinlam> did, but I still get the same error. I think the C complier
kinlam> I have don't have the neccessary lib(sfio). If that's the
kinlam> reason, can anybody know how I can obtain it.(I am using ibm
kinlam> c complier, but if needed I can also use a GNU C).
Make sure you recompile perl (perl Makefile.PL; make clean; make)
after running ./Configure. If configure does not fail (remember to add
the extra include directories and library directories and additional
libraries to link with as described in the docs that come with the
fastcgi development kit), your perl should be ok, and you can finally
do a make install. I am running perl successfully here with sfio and
FCGI.
Marius
------------------------------
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 1691
**************************************
