[12556] in Perl-Users-Digest
Perl-Users Digest, Issue: 6155 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jun 28 12:07:22 1999
Date: Mon, 28 Jun 99 09:00:26 -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 Mon, 28 Jun 1999 Volume: 8 Number: 6155
Today's topics:
Re: 2 simple (not to me tho) questions greyed@my-deja.com
Re: CGI.pm, hashes, passing by reference and two differ <john.warner@tivoli.com>
Re: Communication between CGI and apache (Greg Thomas)
DBI/Mysql help newbie <pat@ssih.ssih.com>
Re: FAQ 3.13: How can I use X or Tk with Perl? (Leo Schalkwyk)
Re: FAQ 3.13: How can I use X or Tk with Perl? <uri@sysarch.com>
Re: FAQs and attitudes (was Re: How can I read a whole (Randal L. Schwartz)
guru needed: system call troubles <argyrodes@sympatico.ca>
Re: help!!!! execute a program in windows NT <swiftkid@bigfoot.com>
Re: help!!!! execute a program in windows NT <gellyfish@gellyfish.com>
Re: help!!!! execute a program in windows NT <rolm@my-deja.com>
Re: How to start a thread in Perl <john.warner@tivoli.com>
Re: How to start a thread in Perl <uri@sysarch.com>
IPC::Msg mworkman@my-deja.com
Re: Linux better than perl? <hvermeulen@correctnl.com>
Re: Linux better than perl? <upsetter@ziplink.net>
Re: Location: help <gellyfish@gellyfish.com>
Re: My script works! PLEASE HELP!!! (Anno Siegel)
New posters to comp.lang.perl.misc <gbacon@cs.uah.edu>
Newbie question (Perl within a C program) <pierre-michel.ansel@steria.fr>
Re: Perl under Win32--file date. <jdsv@hotmailSpAmSuX.com>
R: Location: help <claudio@elettrodata.it>
random numbers ? <greatest@pacific.net.hk>
Re: Re-directing stderr <martin@adoma.se>
Re: Re-directing stderr <martin@adoma.se>
Re: Re-directing stderr <martin@adoma.se>
Re: Read news by Broswer (Randal L. Schwartz)
reading an in memory image with PerlMagick <jdhunter@nitace.bsd.uchicago.edu>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 28 Jun 1999 15:36:16 GMT
From: greyed@my-deja.com
Subject: Re: 2 simple (not to me tho) questions
Message-Id: <7l84pf$jtf$1@nnrp1.deja.com>
In article <376faf51@cs.colorado.edu>,
tchrist@mox.perl.com (Tom Christiansen) wrote:
> Golly, Maude, I think I caught me a live one!
More like you can't read, can you? From the
post you so nicely trimmed:
That is why I do it and, generally, I do it ONLY
on prints.
> Compare:
OK!
> $var = [ qw/grok this/ ];
> fn( $var );
> fn("$var");
I don't see print in there.
> @var = qw/grok this/;
> fn( @var );
> fn("@var");
Still no print.
> $! = 12;
> fn( $! );
> fn("$!");
Look, ma, no print!
> fn( 0x23 );
> fn("0x23");
Still no print!
> fn( 6.02 * 10**23 );
> fn("6.02 * 10**23");
Look, no print!
> fn( 12 | 37 );
> fn("12" | "37");
Still no print!
> Doublequotes stringify. They do not argpassify.
> Stringification can be destructive. Just say
no.
Which is what I want to do in almost every
case where I want to *PRINT* something.
Personally, I prefer the first case to the second.
print("$var of $var2 or $var3 and $var4\n");
print($var." of".$var2." or ".$var3." and
".$var4."\n");
Tom, lemme be blunt about this, turn to page
10 of "Programming Perl, 2nd Edition" by Larry
Wall, Tom Christiansen & Randal L. Schwartz and
read the first paragraph under "How to Do It" and
the assicaited subnote. I'm sure you are familiar
with it since your name is on the book.
As I said, this is how *I* do it. No amount
of snobbery from you will change that because you
are talking in a general case, have not seen ANY
of my specific code, don't know me, don't know how
I code or what I do.
Read those words again. This is how *I* do
it. Deal with it.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 28 Jun 1999 08:49:26 -0500
From: John Warner <john.warner@tivoli.com>
Subject: Re: CGI.pm, hashes, passing by reference and two different results?
Message-Id: <37777D66.D651AB06@tivoli.com>
Ah ha! I knew I must be missing something obvious. Now for the $64 dollar
question: how do I fix it? I've tried every way, except the correct way,
I can think of to reference @row.
John
Ronald J Kimball wrote:
> John Warner <john.warner@tivoli.com> wrote:
>
> > If I change the line
> > table({-border=>"none"},TR(td([@row]))),
> > to
> > table({-border=>"none"},TR(td([\@row]))),
> >
> > Both the browser and command line return:
> > <!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
> > <HTML><HEAD><TITLE>Untitled Document</TITLE>
> > </HEAD><BODY><TABLE
> > BORDER="none"><TR><TD>ARRAY(0x10c57b8)</TD></TR></TABLE></BODY></HTML>
> >
> > Does anyone have an idea what is happening here?
>
> [\@row] is a reference to a reference to an array, but td() expects a
> reference to an array. Thus, it stringifies the inner reference, and
> returns '<TD>ARRAY(0x10c57b8)</TD>'.
>
> --
> _ / ' _ / - aka -
> ( /)//)//)(//)/( Ronald J Kimball rjk@linguist.dartmouth.edu
> / http://www.tiac.net/users/chipmunk/
> "It's funny 'cause it's true ... and vice versa."
--
John Warner Tivoli Systems Inc.
Sales Support Engineer 9442 Capital Of Texas Hwy North
Sales Infrastructure Group Austin, TX 78759
john_warner@tivoli.com
------------------------------
Date: Mon, 28 Jun 1999 15:46:43 GMT
From: thomasgd@omc.bt.co.uk (Greg Thomas)
Subject: Re: Communication between CGI and apache
Message-Id: <37859880.28099905@news.axion.bt.co.uk>
On Mon, 28 Jun 1999 09:41:52 -0400, "Kurt J. Lanza"
<kjl@inforonics.com> wrote in article
<37777BA0.AC38D849@inforonics.com>:
>This is a common problme without a common solution. Your CPU-intensive
>program only gets a SIGPIPE when the OS detects it, which is when your
>program tries to output something and the output fails because the
>browser has broken the connection (ie, is no longer listening for data).
You could try a separate thread that sends an HTML comment
("<!-- testing connection-->") every know and again to check the
status of the connection. You'll need to ensure that the comment is
inserted in the right place of the document, though (i.e. not in the
middle of another HTML tag).
HTH,
Greg
--
This post represents the views of the author and does
not necessarily accurately represent the views of BT.
------------------------------
Date: Mon, 28 Jun 1999 15:55:12 GMT
From: Pat Traynor <pat@ssih.ssih.com>
Subject: DBI/Mysql help newbie
Message-Id: <930585312.698.81@news.remarQ.com>
I've written several programs in 'C' that access the databases that I've
created in MySQL. I'd like to start doing the same thing using Perl,
but I can't find any basic information about this. The MySQL docs gave
straightforward information on how the 'C' interface worked, what
library routines were available, and the correct syntax to use them.
I've searched through dejanews.com for information about this, but
people invariably just point the requestors to CPAN. I found that many
of the CPAN links were broken or forwarded elsewhere, and the ones that
did work were very obtuse.
All I want is a list of perl commands and correct syntax. How do I
connect to the database? How do I perform a query? How do I extract
the rows and fields resulting from the query? That sort of thing.
Is that sort of information out there, or should I just stick with 'C'?
Thanks in advance.
--pat--
--
Pat Traynor
pat@ssih.com
------------------------------
Date: 28 Jun 1999 14:39:13 GMT
From: schalkwy@minnie.RZ-Berlin.MPG.DE (Leo Schalkwyk)
Subject: Re: FAQ 3.13: How can I use X or Tk with Perl?
Message-Id: <7l81eh$82f$1@fu-berlin.de>
Tom Christiansen (perlfaq-suggestions@perl.com) wrote:
: (This excerpt from perlfaq3 - Programming Tools
: ($Revision: 1.38 $, $Date: 1999/05/23 16:08:30 $)
<snip>
: How can I use X or Tk with Perl?
: Tk is a completely Perl-based, object-oriented interface to the Tk
This is a bit confusing. Shouldn't it say "Perl/Tk is..." ?
--
------------------------------------------------------------
schalkwy@mpimg-berlin-dahlem.mpg.de
Max-Planck-Institut f|r molekulare Genetik
Ihnestra_e 73
14195 Berlin-Dahlem
------------------------------
Date: 28 Jun 1999 11:20:55 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: FAQ 3.13: How can I use X or Tk with Perl?
Message-Id: <x7n1xk5p2g.fsf@home.sysarch.com>
>>>>> "LS" == Leo Schalkwyk <schalkwy@minnie.RZ-Berlin.MPG.DE> writes:
LS> Tom Christiansen (perlfaq-suggestions@perl.com) wrote:
LS> : (This excerpt from perlfaq3 - Programming Tools
LS> : ($Revision: 1.38 $, $Date: 1999/05/23 16:08:30 $)
LS> <snip>
LS> : How can I use X or Tk with Perl?
LS> : Tk is a completely Perl-based, object-oriented interface to the Tk
LS> This is a bit confusing. Shouldn't it say "Perl/Tk is..." ?
i didn't read this faq this cycle but does it mention perl/gtk? it
should be mentioned for x apps in this faq. i just learned more about it
at yapc and it seems like a winner. i will ask the maintainer to
forward a patch to tom.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: 28 Jun 1999 07:07:06 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: FAQs and attitudes (was Re: How can I read a whole file in one go ?)
Message-Id: <m1n1xka06t.fsf@halfdome.holdit.com>
>>>>> "Larry" == Larry Rosler <lr@hpl.hp.com> writes:
Larry> In article <slrn7nas3k.npo.abigail@alexandra.delanet.com> on 26 Jun 1999
Larry> 19:29:53 -0500, Abigail <abigail@delanet.com> says...
Larry> ...
>> $ cd ~/Src/perl5.005_57/pod
>> $ cat *.pod | grep -ci 'billtax'
>> 1
>> $ cat *.pod | grep -ci 'prisoner of bill'
>> 1
>> $
Larry> I think Randal owes you two Useless Use of Cat Awards for that. Or
Larry> perhaps only one. :-)
Nope, I would not have awarded that. It's not useless.
print "Just another Perl hacker,"
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Mon, 28 Jun 1999 14:36:55 GMT
From: Norman Crooks <argyrodes@sympatico.ca>
Subject: guru needed: system call troubles
Message-Id: <37778AAC.4393A60@sympatico.ca>
Hi,
I'm having trouble doing a system call to pgp from a perl script. My
script is on a Solaris unix box.
At the command line, the following does what I want it to:
$ perl -e '`/heckler/www/stricker/.pgpdir/pgp -eatw
/heckler/www/stricker/cgi-bi
n/filename.txt Sue`';
It returns the following, and my file is properly encrypted:
Pretty Good Privacy(tm) 2.6.3ia - Public-key encryption for the masses.
(c) 1990-96 Philip Zimmermann, Phil's Pretty Good Software. 1996-03-04
International version - not for use in the USA. Does not use RSAREF.
Current time: 1999/06/27 22:35 GMT
Additionally, this works fine from the command line:
$ perl -e 'system("/heckler/www/stricker/.pgpdir/pgp -eatw
/heckler/www/stricker
/cgi-bin/filename.txt Sue")';
and returns this:
Pretty Good Privacy(tm) 2.6.3ia - Public-key encryption for the masses.
(c) 1990-96 Philip Zimmermann, Phil's Pretty Good Software. 1996-03-04
International version - not for use in the USA. Does not use RSAREF.
Current time: 1999/06/27 22:52 GMT
Recipients' public key(s) will be used to encrypt.
Key for user ID: Sue Stricker <stricker@strickerbooks.com>
1024-bit key, key ID CD393A49, created 1999/06/23
.
Transport armor file: /heckler/www/stricker/cgi-bin/filename.txt.asc
File /heckler/www/stricker/cgi-bin/filename.txt wiped and deleted.
In the script however, neither of these statements work:
`/heckler/www/stricker/.pgpdir/pgp -eatw
/heckler/www/stricker/cgi-bin/filename.txt Sue`;
Returns a SERVER ERROR message
and,
system("/heckler/www/stricker/.pgpdir/pgp -eatw
/heckler/www/stricker/cgi-bin/filename.txt Sue");
returns
Recipients' public key(s) will be used to encrypt. Preparing random
session key...
but doesn't actually do any encryption. My script also 'stalls' at
this point.
If anyone can tell me the proper syntax to call pgp and encrypt from
within a script I would be very appreciative. I should of had this done
a week ago...
Thanks,
-Norm
--
http://www.nobelmed.com/ncrooks
mailto:argyrodes@sympatico.ca
------------------------------
Date: Mon, 28 Jun 1999 19:38:15 +0500
From: "Faisal Nasim" <swiftkid@bigfoot.com>
Subject: Re: help!!!! execute a program in windows NT
Message-Id: <7l94l1$3uo6@news.cyber.net.pk>
perldoc -f system
example:
system '\directory\myexe.exe';
--
Faisal Nasim (the Whiz Kid)
Web: http://wss.hypermart.net/
AOL: Whiz Swift ICQ: 4265451
FAX: (815) 846-2877
------------------------------
Date: 28 Jun 1999 15:54:59 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: help!!!! execute a program in windows NT
Message-Id: <37778cc3@newsread3.dircon.co.uk>
Edu <edu@milenium.com> wrote:
>
> How can i execute a program form a perl program in windows NT????
>
>
The same way you would do with any operating system - read about system()
in the perlfunc manpage.
/J\
--
"It's times like this I wish I had a penis" - Duckman
------------------------------
Date: Mon, 28 Jun 1999 15:37:47 GMT
From: RoLm <rolm@my-deja.com>
Subject: Re: help!!!! execute a program in windows NT
Message-Id: <7l84sa$ju3$1@nnrp1.deja.com>
In article <930577640.86423@srv6>,
"Edu" <edu@milenium.com> wrote:
>
> How can i execute a program form a perl program in windows NT????
>
> Thanks!!!!
> --
>
> Eduardo Hidalgo Pelegrina
> OgilvyInteractive
> eduardo.hidalgo@OgilvyInteractive.es
>
>
use backticks (the single quotes that share the key with the tilde) like
this:
@array = `dir -w`;
or use the system command like this:
system ("dir -w");
be sure to check a reference for the proper and advanced use of either
method.
Ciao,
RoLm
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 28 Jun 1999 08:50:45 -0500
From: John Warner <john.warner@tivoli.com>
Subject: Re: How to start a thread in Perl
Message-Id: <37777DB5.2D1A0C66@tivoli.com>
You have no option but to wait for ActiveState. They recently received a
grant from Microsoft to continue development of Perl including implementing
fork. Sorry.
osman durrani wrote:
> Hi people,
> could anyone tell me how to do start a function in a thread in perl ?.I
> have perl on NT and cant do a fork.
> Thanx in advance
--
John Warner Tivoli Systems Inc.
Sales Support Engineer 9442 Capital Of Texas Hwy North
Sales Infrastructure Group Austin, TX 78759
john_warner@tivoli.com
------------------------------
Date: 28 Jun 1999 11:17:57 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: How to start a thread in Perl
Message-Id: <x7pv2g5p7e.fsf@home.sysarch.com>
>>>>> "od" == osman durrani <osman@focomedia.de> writes:
od> Hi people,
od> could anyone tell me how to do start a function in a thread in perl ?.I
od> have perl on NT and cant do a fork.
you don't start threads in perl, you start them in a newsgroup.
uri
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
uri@sysarch.com --------------------------- Perl, Internet, UNIX Consulting
Have Perl, Will Travel ----------------------------- http://www.sysarch.com
The Best Search Engine on the Net ------------- http://www.northernlight.com
------------------------------
Date: Mon, 28 Jun 1999 14:08:46 GMT
From: mworkman@my-deja.com
Subject: IPC::Msg
Message-Id: <7l7vl5$hm6$1@nnrp1.deja.com>
I am trying to use IPC::Msg. Everything seems to work fine if I go by
the examples that are out there. The problem is that I would like to
use a key other than IPC_PRIVATE. How do I do that? I have several
different independent processes that I would like to have working out
of the same queue. One of them doing all the receiving the others
doing all the sending. How can I accomplish this? I don't seem to be
able to use anything other than IPC_PRIVATE.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Mon, 28 Jun 1999 16:37:16 +0200
From: Henry Vermeulen <hvermeulen@correctnl.com>
Subject: Re: Linux better than perl?
Message-Id: <3777889C.EC25A45F@correctnl.com>
Nedret wrote:
> In article <7l6lmt$vio$10@newsfeed.smartt.com>,
> joey@hecnyyvr.com (J.Y.) wrote:
> > Linux better than perl?
> > -JY
> >
> >
>
> - What is the difference between the crocodile?
> - The crocodile is longer than green.
>
> :-)
>
> --
> Nedret
>
> Sent via Deja.com http://www.deja.com/
> Share what you know. Learn what you don't.
What's the difference between a dead bird?
The one leg has the same lenght!
Henry
------------------------------
Date: Mon, 28 Jun 1999 15:59:22 GMT
From: Scratchie <upsetter@ziplink.net>
Subject: Re: Linux better than perl?
Message-Id: <uZMd3.117$6M6.40032@news.shore.net>
Joseph Hertzlinger <jhertzli@ix.netcom.com> wrote:
:>In comp.lang.perl.misc, joey@hecnyyvr.com (J.Y.) writes:
:>:Linux better than perl?
:>
:>America better than roads!
: Overheard remark: "Isn't HTML being replaced by Netscape?"
"They have the Internet on computers now?"
--Homer Simpson
--Art
--
--------------------------------------------------------------------------
National Ska & Reggae Calendar
http://www.agitators.com/calendar/
--------------------------------------------------------------------------
------------------------------
Date: 28 Jun 1999 15:40:45 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Location: help
Message-Id: <3777896d@newsread3.dircon.co.uk>
Info <info@zoomnet.net> wrote:
>
> i have script that runs in a frame and i want use the location command to
> pull up a new page but i want it to goto t\another frame so the script will
> continue to run can this be done .???
>
<http://www.webthing.com/tutorials/cgifaq.html>
comp.infosystems.www.authoring.cgi
/J\
--
"Most big companies don't like you very much, except hotels, airlines
and Microsoft, which don't like you at all" - Bill Bryson
------------------------------
Date: 28 Jun 1999 14:13:47 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: My script works! PLEASE HELP!!!
Message-Id: <7l7vur$22t$1@lublin.zrz.tu-berlin.de>
Gareth Rees <garethr@cre.canon.co.uk> wrote in comp.lang.perl.misc:
>Anno Siegel <anno4000@lublin.zrz.tu-berlin.de> wrote:
>> I'm using strings as sets of integers
>
>It's worth checking CPAN to see if anyone has written an appropriate
>module for your needs. It appears to me that the module Bit::Vector
>will provide the functionality you need. See
>http://www.cpan.org/modules/by-module/Bit/Bit-Vector-5.7.tar.gz
I knew about Bit::Vector, but your hint gave me the incentive to
actually download the module.
>If your requirements are such that Bit::Vector is inappropriate, try
>comp.lang.perl.misc again, with a bit more about what you're trying to
>achieve.
Bit::Vector isn't entirely inappropriate. What I need though,
is a hash of bit vectors which I want to make persistent (the
vectors are expensive to compute). This is trivially done using
perl strings as vec's together with one of the DB modules. It's
a bit harder to do with objects, which are references by nature.
Also, thanks to a hint by Tom Phoenix, the dissatisfying iterator
routine I published looks nice and clean now. (Using a lookup
table for the lowest nonzero bit in a byte made everything else
fall into place.) So I'll stick with perl's builtin vec's for
now, unless bit manipulation turns out to be a major (minor?)
bottleneck.
Anno
------------------------------
Date: 28 Jun 1999 15:49:30 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: New posters to comp.lang.perl.misc
Message-Id: <7l85ia$2f3$2@info2.uah.edu>
Following is a summary of articles from new posters spanning a 7 day
period, beginning at 21 Jun 1999 15:38:42 GMT and ending at
27 Jun 1999 07:06:09 GMT.
Notes
=====
- A line in the body of a post is considered to be original if it
does *not* match the regular expression /^\s{0,3}(?:>|:|\S+>|\+\+)/.
- All text after the last cut line (/^-- $/) in the body is
considered to be the author's signature.
- The scanner prefers the Reply-To: header over the From: header
in determining the "real" email address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Find the News-Scan distribution on the CPAN!
<URL:http://www.perl.com/CPAN/modules/by-module/News/>
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
- Copyright (c) 1999 Greg Bacon.
Verbatim copying and redistribution is permitted without royalty;
alteration is not permitted. Redistribution and/or use for any
commercial purpose is prohibited.
Totals
======
Posters: 264 (49.5% of all posters)
Articles: 375 (21.9% of all articles)
Volume generated: 600.1 kb (20.6% of total volume)
- headers: 271.5 kb (5,486 lines)
- bodies: 323.4 kb (11,013 lines)
- original: 248.7 kb (8,709 lines)
- signatures: 4.8 kb (124 lines)
Original Content Rating: 0.769
Averages
========
Posts per poster: 1.4
median: 1.0 post
mode: 1 post - 199 posters
s: 1.1 posts
Message size: 1638.5 bytes
- header: 741.4 bytes (14.6 lines)
- body: 883.0 bytes (29.4 lines)
- original: 679.0 bytes (23.2 lines)
- signature: 13.1 bytes (0.3 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
8 12.7 ( 5.7/ 7.0/ 7.0) Mike Dichirico <mdichirico@lamotionpictures.com>
6 11.1 ( 4.3/ 6.8/ 1.8) "Faisal Nasim" <swiftkid@bigfoot.com>
6 8.6 ( 4.1/ 4.5/ 1.3) mr@kells.kells ()
6 11.9 ( 4.8/ 7.1/ 5.1) Shane Fisher <fishers@lister.acm.wwu.edu>
6 14.1 ( 4.4/ 9.7/ 6.6) roberthp@my-deja.com
6 8.6 ( 4.6/ 4.1/ 2.9) Kazuma <kazuma@my-deja.com>
4 5.9 ( 3.4/ 2.4/ 0.6) srishti <srishti@vsnl.com>
4 8.2 ( 3.8/ 4.0/ 2.4) glasser@iname.com (David Glasser)
4 5.6 ( 2.8/ 2.9/ 2.0) Kevin Hancock <khan@arcom.com.au>
4 4.7 ( 2.4/ 2.2/ 1.3) "Rich Campbell" <rcampbel@gbtech.net>
These posters accounted for 3.2% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
14.1 ( 4.4/ 9.7/ 6.6) 6 roberthp@my-deja.com
12.7 ( 5.7/ 7.0/ 7.0) 8 Mike Dichirico <mdichirico@lamotionpictures.com>
11.9 ( 4.8/ 7.1/ 5.1) 6 Shane Fisher <fishers@lister.acm.wwu.edu>
11.1 ( 4.3/ 6.8/ 1.8) 6 "Faisal Nasim" <swiftkid@bigfoot.com>
9.0 ( 2.9/ 5.8/ 4.8) 3 Eric Anderson <eman@cc.gatech.edu>
8.6 ( 4.6/ 4.1/ 2.9) 6 Kazuma <kazuma@my-deja.com>
8.6 ( 4.1/ 4.5/ 1.3) 6 mr@kells.kells ()
8.2 ( 1.4/ 6.8/ 6.8) 2 johnbishop@my-deja.com
8.2 ( 3.8/ 4.0/ 2.4) 4 glasser@iname.com (David Glasser)
7.0 ( 1.6/ 5.4/ 4.3) 2 "Pletschette Andri" <andre.pletschette@ltam.lu>
These posters accounted for 3.4% of the total volume.
Top 10 Posters by OCR (minimum of three posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
1.000 ( 7.0 / 7.0) 8 Mike Dichirico <mdichirico@lamotionpictures.com>
0.828 ( 4.8 / 5.8) 3 Eric Anderson <eman@cc.gatech.edu>
0.723 ( 0.9 / 1.3) 3 bobo_the_monkey@my-deja.com
0.723 ( 1.5 / 2.1) 3 akhazano@oacis.com (Andrew Khazanov)
0.718 ( 2.9 / 4.1) 6 Kazuma <kazuma@my-deja.com>
0.716 ( 5.1 / 7.1) 6 Shane Fisher <fishers@lister.acm.wwu.edu>
0.705 ( 1.4 / 1.9) 3 "William" <bivey@teamdev.com>
0.704 ( 2.0 / 2.9) 4 Kevin Hancock <khan@arcom.com.au>
0.679 ( 2.0 / 2.9) 3 tfischer@deakin.edu.au (Thomas Fischer)
0.676 ( 6.6 / 9.7) 6 roberthp@my-deja.com
Bottom 10 Posters by OCR (minimum of three posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.601 ( 0.8 / 1.3) 3 Daniel Grisinger <dgrisinger@exactis.com>
0.591 ( 2.4 / 4.0) 4 glasser@iname.com (David Glasser)
0.572 ( 1.3 / 2.2) 4 "Rich Campbell" <rcampbel@gbtech.net>
0.523 ( 1.4 / 2.7) 4 "Ariel" <fake@nospam.edu>
0.509 ( 1.0 / 2.0) 3 "Erik Denkers" <edenkers@ktis.net>
0.416 ( 0.8 / 1.9) 3 David Barnes <aardvark@ibm.net>
0.396 ( 1.7 / 4.2) 3 jgruiz1@ibm.net
0.285 ( 1.3 / 4.5) 6 mr@kells.kells ()
0.266 ( 1.8 / 6.8) 6 "Faisal Nasim" <swiftkid@bigfoot.com>
0.254 ( 0.6 / 2.4) 4 srishti <srishti@vsnl.com>
21 posters (7%) had at least three posts.
Top 10 Crossposters
===================
Articles Address
-------- -------
6 techsup@datascan.co.uk
5 Shane Fisher <fishers@lister.acm.wwu.edu>
3 Scientia <scientia@XXXtechnologist.com>
3 jgruiz1@ibm.net
2 johnbishop@atl.mediaone.net
2 Oliver Willandsen <oliver.willandsen@sg.cec.be>
2 Jim Nicholson <jnich@pdd.att.com>
2 johnbishop@my-deja.com
2 dave@foobar.com (Dave)
2 Isaac <gorgonous@spiretech.com>
------------------------------
Date: Mon, 28 Jun 1999 15:29:31 GMT
From: Pierre-Michel Ansel <pierre-michel.ansel@steria.fr>
Subject: Newbie question (Perl within a C program)
Message-Id: <377794EC.7A98E9B5@steria.fr>
Hello,
I would like to execute a Perl script from within an executable
(C language).
- First question : is it possible? do I need special packages or
libraries?
- Second question : what kind of data structures can be exchanged
between the Perl script and the executable?. Are there
limitations (type of return value ...).
Best regards.
Pierre-Michel Ansel
------------------------------
Date: Mon, 28 Jun 1999 09:45:46 -0600
From: "Jeremy" <jdsv@hotmailSpAmSuX.com>
Subject: Re: Perl under Win32--file date.
Message-Id: <LMMd3.92$by5.26175@news.uswest.net>
Thanks so much for the help!
-Jeremy
------------------------------
Date: Mon, 28 Jun 1999 16:04:16 +0200
From: "Claudio Villa Santa" <claudio@elettrodata.it>
Subject: R: Location: help
Message-Id: <7l7vdd$8ko$1@ffx2nh5.news.uu.net>
You may use 'target' tag in your HTML page where you call CGI script
somethings like this:
<A HREF=\"listino.cgi?cod=$xxx&cam=$rif\" target=\"destra\">
listino.cgi?cod=$xxx&cam=$rif 'this is script calling whit variables'
target=\"destra\" 'and this is name of frame where you want to put script
output'
you find frame names in html page that create it.
Greatings
Claudio
Info <info@zoomnet.net> wrote in message 930575585.946.63@news.remarQ.com...
> ok this what i need hopefully some of you guru's can help.
>
> i have script that runs in a frame and i want use the location command to
> pull up a new page but i want it to goto t\another frame so the script
will
> continue to run can this be done .???
>
>
------------------------------
Date: Mon, 28 Jun 1999 23:06:59 +0800
From: charlie <greatest@pacific.net.hk>
Subject: random numbers ?
Message-Id: <37778F93.A940EE85@pacific.net.hk>
Hello all, i am new to perl and have a lot don't understand.
i try to generate six numbers out of 1 to 47 randomly by
the code below, but it generate the same six numbers every time.
THANK YOU !
#!/usr/local/bin/perl -w
$drawn = 0;
$range = 47;
DRAWN:while ($drawn < 6){
$num[$drawn] = int(rand $range) + 1;
$check = scalar(@num);
if ($check > 1){
for ($compare=0; $compare < ($check - 1); $compare++ ){
if ($num[$drawn] == $num[$compare] ){
print "having same number twice.\n";
redo DRAWN; }
}
}
} continue {
$drawn++;}
@num = sort {$b <=> $a} @num;
print @num\n;
------------------------------
Date: Mon, 28 Jun 1999 15:35:28 +0100
From: "Martin Quensel" <martin@adoma.se>
Subject: Re: Re-directing stderr
Message-Id: <7l7v1j$lg0$1@zingo.tninet.se>
Greg Miller skrev i meddelandet <3777e061.316706619@news.alt.net>...
> How can stderr be redirected to stdio?
>
stdio? you mean something else i guess..
If you want it to your browser, this is a simple soloution.
use CGI::Carp qw(fatalsToBrowser);
MVH
Martin Quensel
------------------------------
Date: Mon, 28 Jun 1999 15:35:28 +0100
From: "Martin Quensel" <martin@adoma.se>
Subject: Re: Re-directing stderr
Message-Id: <7l7vpb$m8g$1@zingo.tninet.se>
Greg Miller skrev i meddelandet <3777e061.316706619@news.alt.net>...
> How can stderr be redirected to stdio?
>
stdio? you mean something else i guess..
If you want it to your browser, this is a simple soloution.
use CGI::Carp qw(fatalsToBrowser);
MVH
Martin Quensel
------------------------------
Date: Mon, 28 Jun 1999 15:35:28 +0100
From: "Martin Quensel" <martin@adoma.se>
Subject: Re: Re-directing stderr
Message-Id: <7l7utj$lar$1@zingo.tninet.se>
Greg Miller skrev i meddelandet <3777e061.316706619@news.alt.net>...
> How can stderr be redirected to stdio?
>
stdio? you mean something else i guess..
If you want it to your browser, this is a simple soloution.
use CGI::Carp qw(fatalsToBrowser);
MVH
Martin Quensel
------------------------------
Date: 28 Jun 1999 07:18:20 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Read news by Broswer
Message-Id: <m1hfns9zo3.fsf@halfdome.holdit.com>
>>>>> "Trond" == Trond Michelsen <mike@crusaders.no> writes:
Trond> News::NNTPClient
Trond> This module is, as it suggests, an NNTPClient. It provides methods for
Trond> receiving headers, messages, overview-records, etc. If you already know how
Trond> to communicate with a newsserver you'll be able to use this module straight
Trond> away. If not, you'll have to read the manual.
Last I saw, there wasn't anything in News:NNTPClient that wasn't
in the later-designed, actively supported Net::NNTP.
print "Just another Perl hacker,"
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: Mon, 28 Jun 1999 14:47:52 GMT
From: John Hunter <jdhunter@nitace.bsd.uchicago.edu>
Subject: reading an in memory image with PerlMagick
Message-Id: <1rg13cz8iv.fsf@ace.bsd.uchicago.edu>
I have some tar archives of image files that I want to maipulate with
PerlMagick. I am using Archive::Tar to read the archive and I would
prefer to work with in memory objects rather than first extract to
disk to use PerlMagick. Can this be done? The Read() method of
PerlMagick seems to only accept filenames as arguments.
Thanks,
John
------------------------------
Date: 12 Dec 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 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 6155
**************************************
