[8812] in Perl-Users-Digest
Perl-Users Digest, Issue: 2429 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Apr 27 13:17:39 1998
Date: Mon, 27 Apr 98 10: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, 27 Apr 1998 Volume: 8 Number: 2429
Today's topics:
Re: "Slurp"? (Abigail)
ANNOUNCE: IO-stringy 1.203 uploaded to CPAN <eryq@zeegee.com>
ANNOUNCE: MailCclient 0.2 Mailbox (incl IMAP) access (Malcolm Beattie)
Re: Appending Lines 1&2, 3&4, ETC., <danboo@negia.net>
Re: books for learning perl (Ed Jamison)
Re: convert an @array into a single $variable? <guenter@arithmos.com>
Re: convert an @array into a single $variable? <jdf@pobox.com>
Re: convert an @array into a single $variable? (Abigail)
Re: Defending Perl (Abigail)
Re: How strong is the perl crypt function ? (Abigail)
Interrupt handling with pipes with perl <rallen@seafloor.com>
Re: Interrupt handling with pipes with perl <br@ndon.com>
libnet installed on activestate nt port <elssa09@callisto.si.usherb.ca>
Re: newbie question otis@POPULUS.net
Opening another browser <svetter@ameritech.net>
Re: QRe: == vs. eq (Greg Bacon)
Re: QRe: == vs. eq (Chris Nandor)
randal stars in merlin! <uri@sysarch.com>
Re: REQ: Win32 POP3 client (John Moreno)
Statistics for comp.lang.perl.misc <gbacon@cs.uah.edu>
Syntax to make my hit counter work? <iain.gatt@strath.ac.uk>
w3mir 1.0.2 <janl@math.uio.no>
Wcl-2.7.3 uploaded for X11::Wcl <jhpb@sarto.gaithersburg.md.us>
Re: weird problem with ie4 (Jason Gloudon)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 27 Apr 1998 15:44:47 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: "Slurp"?
Message-Id: <6i295f$72h$8@client3.news.psi.net>
root (jimmer@charm.net) wrote on MDCC September MCMXCIII in
<URL: news:ogxnla05.fsf@jimmer.charm.net>:
++
++ I vaguely remember seeing a technique once where an entire input file
++ is read in with a single command, carriage returns and all. My poor
++ memory also seems to think it was called "slurping" the file, but I
++ cannot find any reference to it in the camel book, the newsgroup, or
++ the FAQ. Is there such a thing. If so, how is it done (and what is
++ it really called)?
{local $/; $file = <FILE>}
You can deduce this from the manual, but the section that talks about
the <> operator only mentions $/ (and then only briefly) when `` is
being discussed. Maybe $/ should be mentioned in combination with <>
as well, with a pointer to perlvar.
Abigail
--
perl -MTime::JulianDay -lwe'@r=reverse(M=>(0)x99=>CM=>(0)x399=>D=>(0)x99=>CD=>(
0)x299=>C=>(0)x9=>XC=>(0)x39=>L=>(0)x9=>XL=>(0)x29=>X=>IX=>0=>0=>0=>V=>IV=>0=>0
=>I=>$r=-2449231+gm_julian_day+time);do{until($r<$#r){$_.=$r[$#r];$r-=$#r}for(;
!$r[--$#r];){}}while$r;$,="\x20";print+$_=>September=>MCMXCIII=>()'
------------------------------
Date: 27 Apr 1998 15:24:46 GMT
From: Eryq <eryq@zeegee.com>
Subject: ANNOUNCE: IO-stringy 1.203 uploaded to CPAN
Message-Id: <6i27vu$b96$1@news.neta.com>
The latest version of IO-stringy has been uploaded to the
CPAN. It provides:
IO::
::AtomicFile adpO Write a file which is updated atomically ERYQ
::Lines bdpO I/O handle to read/write to array of lines ERYQ
::Scalar RdpO I/O handle to read/write to a string ERYQ
::ScalarArray RdpO I/O handle to read/write to array of scalars ERYQ
::Wrap RdpO Wrap old-style FHs in standard OO interface ERYQ
::WrapTie adpO Tie your handles & retain full OO interface ERYQ
Full distribution on-line at:
http://www.zeegee.com/code/perl/IO-stringy
Documentation too, at:
http://www.zeegee.com/code/perl/IO-stringy/docs/IO/Stringy.pm.html
Comments most welcome for the IO::WrapTie stuff. That's still in Alpha,
so get your gripes in now! I'd also appreciate it if IO-experienced Perlers
would pop the hood and look around inside IO::WrapTie.
Enjoy!
--
___ _ _ _ _ ___ _ Eryq (eryq@zeegee.com)
/ _ \| '_| | | |/ _ ' / President, Zero G Inc: http://www.zeegee.com/
| __/| | | |_| | |_| |
\___||_| \__, |\__, |___/\ Visit STREETWISE, Chicago's newspaper by/
|___/ |______/ of the homeless: http://www.streetwise.org
------------------------------
Date: 27 Apr 1998 15:28:08 GMT
From: mbeattie@sable.ox.ac.uk (Malcolm Beattie)
Subject: ANNOUNCE: MailCclient 0.2 Mailbox (incl IMAP) access
Message-Id: <6i2868$bb6$1@news.neta.com>
Keywords: MailCclient mail cclient imap
The MailCclient Perl extension (version 0.2) is now available. It
provides access to mailboxes in many different formats (including
remote IMAP folders and multipart MIME messages) via the c-client API.
The c-client library is the core library used by Pine and the
University of Washington IMAP daemon (written by Mark Crispin).
This version is now fairly complete and reasonably documented (wow).
It should be making its way around CPAN by now and is also available
from its home site:
ftp://ftp.ox.ac.uk/pub/perl/MailCclient-0.2.tar.gz
It requires the c-client library to build which is available as part
of the UW imapd distribution available from, for example,
ftp://ftp.cac.washington.edu:/mail/imap-4.1.BETA.tar.Z
--Malcolm
--
Malcolm Beattie <mbeattie@sable.ox.ac.uk>
Oxford University Computing Services
"I permitted that as a demonstration of futility" --Grey Roger
------------------------------
Date: Mon, 27 Apr 1998 11:46:22 -0400
From: Dan Boorstein <danboo@negia.net>
Subject: Re: Appending Lines 1&2, 3&4, ETC.,
Message-Id: <3544A84E.CFC81F52@negia.net>
Craig Berry wrote:
>
> Dan Boorstein (danboo@negia.net) wrote:
> : if i'm understanding this correctly, you simply want to 'chomp' (safer
> : than 'chop') odd numbered lines. if so, do so:
> :
> : while(<DATA>) {
> : $. % 2 && chomp; # '$.' is the current input line number
> : print;
> : }
>
> A perhaps more common and transparent way to express the second line would
> be:
>
> chomp unless $. % 2;
$your_version =~ s/unless/if/;
i think he wanted odd lines chomped.
--
Dan Boorstein home: danboo@negia.net work: danboo@y-dna.com
"THERE IS AS YET INSUFFICIENT DATA FOR A MEANINGFUL ANSWER."
- Cosmic AC
------------------------------
Date: Mon, 27 Apr 1998 16:03:59 GMT
From: edwardj@torvalds.keepthespamthanks.com (Ed Jamison)
Subject: Re: books for learning perl
Message-Id: <MPG.fae6819a70362a39896c5@news.ais.net>
Refer to your topic, my friend.... Learning Perl, from O'Reilly, by
Randall Schwartz, is the book to get. You'll not find better.
HTH,
Edward Jamison
> > hello i'm new to perl and i would like to know if there are any good
> > books for learning perl
> > i already have perl 5 for dummies but it seems the author wrote the book
> > for people that
> > are already familier with other programming languages.
> > please help i want to learn so bad, it seems so interesting.
> > thanks
> > jason
>
>
>
>
------------------------------
Date: Mon, 27 Apr 1998 08:36:34 -0700
From: Guenter Steinbach <guenter@arithmos.com>
To: Bryan T Hoch <bth@acsu.buffalo.edu>
Subject: Re: convert an @array into a single $variable?
Message-Id: <3544A602.474B@arithmos.com>
Bryan T Hoch wrote:
> Hi, does any one know how to take the seperate elements of an
> array an pass them all as a string into a single variable?
$var = join(' ', @array);
and you get blanks (or any separator of your choice) separating the
elements.
--
Guenter Steinbach, Arithmos Inc., guenter@arithmos.com
------------------------------
Date: 27 Apr 1998 12:16:43 -0500
From: Jonathan Feinberg <jdf@pobox.com>
Subject: Re: convert an @array into a single $variable?
Message-Id: <zph7nq10.fsf@mailhost.panix.com>
mjtg@cus.cam.ac.uk (M.J.T. Guy) writes:
> Or you could just write
>
> $scalar = "@array";
>
> if you want the elements separated by spaces.
Or, more precisely, separated by the contents of the $" variable,
which is ' ' by default.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: 27 Apr 1998 16:24:14 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: convert an @array into a single $variable?
Message-Id: <6i2bfe$9c3$1@client2.news.psi.net>
Bryan T Hoch (bth@acsu.buffalo.edu) wrote on MDCC September MCMXCIII in
<URL: news:Pine.GSO.3.96.980427093122.14673A-100000@hercules.acsu.buffalo.edu>:
++ Hi, does any one know how to take the seperate elements of an
++ array an pass them all as a string into a single variable?
$variable = "@array";
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=new Math::BigInt+qq;$^F$^W783$[$%9889$^F47$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W98$^F76777$=56;;$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V%$^U;$^V/=$^U}while$^V!=$^W'
------------------------------
Date: 27 Apr 1998 15:48:13 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Defending Perl
Message-Id: <6i29bt$72h$9@client3.news.psi.net>
Martien Verbruggen (mgjv@comdyn.com.au) wrote on MDCXCIX September
MCMXCIII in <URL: news:6i0eua$6j8$4@comdyn.comdyn.com.au>:
++ In article <353F5237.5CFB@min.net>,
++ John Porter <jdporter@min.net> writes:
++
++ > Myth: Perl has some installation problems.
++ >
++ > Fact: Perl is easy to install, especially if installing
++ > a precompiled binary.
++
++ I actually find it a lot easier to compile perl myself. :)
++
Uhm, uhm, I find perl one of the hardest things to install.
I'd rather install gcc -- much simpler.
Abigail
--
perl -MLWP::UserAgent -MHTML::TreeBuilder -MHTML::FormatText -wle'print +(HTML::FormatText -> new -> format (HTML::TreeBuilder -> new -> parse (LWP::UserAgent -> new -> request (HTTP::Request -> new ("GET", "http://work.ucsd.edu:5141/cgi-bin/http_webster?isindex=perl")) -> content)) =~ /(.*\))[-\s]+Additional/s) [0]'
------------------------------
Date: 27 Apr 1998 16:01:01 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: How strong is the perl crypt function ?
Message-Id: <6i2a3t$72h$10@client3.news.psi.net>
Michael Haertfelder (haert@wharp.rhein-main.de) wrote on MDCXCIX
September MCMXCIII in <URL: news:6scFmyvFZZB@wharp.rhein-main.de>:
++ There is a built-in function "crypt" in perl. It resembles at the crypt
++ function in C and it guess that this is not as strong as PGP.
It is not as strong as concrete either. PGP and crypt() have totally
different purposes. PGP is an encryption/decryption algorithm, while
crypt() is a one-way-hash.
++ But how strong is this really ? In other words: How many hours does it
++ take for an expert with a Pentium 300MHZ machine and the best known crypto
++ analysis program to decrypt such data ?
Recent attacks on DES and RSA-129 have shown that searching large
key spaces certainly is possible with nowadays equipment. crypt()
has a keyspace of at most 18519084246547628289 different keys.
(256^8 + 256^7 + 256^6 + 256^5 + 256^4 + 256^3 + 256^2 + 256^1 + 256^0)
++
++ Is it possible to apply this function to whole files ?
Well, if you divide it into very small chunks, yes. But why?
Abigail
--
perl -pwle '$_ .= reverse'
------------------------------
Date: 27 Apr 1998 15:56:21 GMT
From: "Ryan Allen" <rallen@seafloor.com>
Subject: Interrupt handling with pipes with perl
Message-Id: <01bd71f5$20f1b6c0$66daf726@vasco>
I need to re-direct my standard output to many places, so I am using the
'tee' utility. Now I need to enhance my error handling to capture a
interrupt or a break in the processing.
If a user sends a Ctrl+c during the 'tee' part of execution, my script does
not capture the interrupt.
here is a small example of what I mean
about pipe and error handler,
-----------------------
#!/usr/local/bin/perl
$| = 1;
$SIG{'INT'} = 'bad_news';
print "this is a test-backquotes\n";
$result = 'date; sleep 10; date';
print "done with backquotes\n";
print "result is \n$result";
print "all done\n";
sub bad_news { print @_; &clean_up; exit 1; }
sub clean_up {
print "cleaning up ...";
print "done\n";
}
-----------------------
ok, say this script is named "junk"
% junk
ctrl-c
and clean_up will run
% junk | tee
ctrl-c
and clean_up will not run
I need to somehow capture that signal!!! Does anybody know how?
P.S. I am running this on Sun Solaris 2.51
--------------------------
Ryan Allen
Programmer/Analyst
Seafloor Surveys International
Seattle Washington
---------------------------
------------------------------
Date: Mon, 27 Apr 1998 12:03:54 -0400
From: Brandon Golm <br@ndon.com>
To: Ryan Allen <rallen@seafloor.com>
Subject: Re: Interrupt handling with pipes with perl
Message-Id: <3544AC6A.7166DCFD@ndon.com>
Ryan Allen wrote:
>
> I need to re-direct my standard output to many places, so I am using the
> 'tee' utility. Now I need to enhance my error handling to capture a
> interrupt or a break in the processing.
>
> If a user sends a Ctrl+c during the 'tee' part of execution, my script does
> not capture the interrupt.
>
> here is a small example of what I mean
> about pipe and error handler,
> -----------------------
> #!/usr/local/bin/perl
>
> $| = 1;
> $SIG{'INT'} = 'bad_news';
$SIG{'INT'} = sub { &do_something };
> print "this is a test-backquotes\n";
> $result = 'date; sleep 10; date';
> print "done with backquotes\n";
> print "result is \n$result";
> print "all done\n";
>
> sub bad_news { print @_; &clean_up; exit 1; }
>
> sub clean_up {
> print "cleaning up ...";
> print "done\n";
> }
> -----------------------
> ok, say this script is named "junk"
> % junk
> ctrl-c
> and clean_up will run
>
> % junk | tee
> ctrl-c
> and clean_up will not run
>
> I need to somehow capture that signal!!! Does anybody know how?
------------------------------
Date: Mon, 27 Apr 1998 16:10:51 GMT
From: ELSS Admin <elssa09@callisto.si.usherb.ca>
Subject: libnet installed on activestate nt port
Message-Id: <3545E8FE.124B@callisto.si.usherb.ca>
Simple question:
Can libnet be installed on an activestate nt port?
Sounds silly, but I'm a little weary.
Is it "newbie-like easy" enough to install?
Thanks
------------------------------
Date: Mon, 27 Apr 1998 10:33:14 -0600
From: otis@POPULUS.net
Subject: Re: newbie question
Message-Id: <6i28fq$nrb$1@nnrp1.dejanews.com>
Of course.
But why don't you ask this in the appropriate newsgroup?
CGI scripts are not PERL, they can just be written in PERL.
Otis
In article <Pine.GSO.3.96.980425125311.29189D-100000@larry.cc.emory.edu>,
"Igor I. Tovstopyat-Nelip" <itovsto@emory.edu> wrote:
>
> Hi everybody,
>
> Is it possible/reasonable to learn the CGI programming and to test scripts
> on a stand-alone machine (PC under the Linux OS) running an Apache server?
>
> Thank you for your patience.
>
> Igor.
>
>
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 27 Apr 1998 12:52:54 -0400
From: Scott Vetter <svetter@ameritech.net>
Subject: Opening another browser
Message-Id: <3544B7E6.5628@ameritech.net>
In HTML I know that I can open another browser session with [<a
href="http://u.r.l" target="_blank">Some Text</a>, but how can you do it
within a Perl program?
------------------------------
Date: 27 Apr 1998 16:32:06 GMT
From: gbacon@cs.uah.edu (Greg Bacon)
Subject: Re: QRe: == vs. eq
Message-Id: <6i2bu6$stl$1@info.uah.edu>
In article <35436151.59D@tidalwave.net>,
Steve Palincsar <palincss@tidalwave.net> writes:
: John Moreno wrote:
: > The idea that you can tell (negatively at least) how competent a person
: > is by what newsreader they use has a certain appeal. But I think it's
:
: However it is wrong, stupid, and prejudicial, as well as
: being needlessly derogatory.
Real users use Real Tools. While it's perhaps ``unfair'' to make the
generalization Tom did, it is a very good heuristic. If you don't
believe me, tally the number of clueless posts (FAQs, horridly wrong
answers, etc.) generated with different newsreaders (as determined by
the son-of-1036 denounced X-Newsreader: header). Sit on EFnet's #perl
channel and count the number of stupid questions from people who use
mIRC. Do this, and you will understand the prejudices that Tom (and
most of the rest of the clpmisc regular answerers) holds.
Do not judge a man until you've walked a mile in his shoes.
: Personally, I have no
: problem with Tom or Abigail responding to someone like
: Kelby that they should RTFM, since they so richly deserve
: that response, but I do deeply and profoundly resent being
: lumped together such people based on the software I am
: using to read this newsgroup.
Then get a real newsreader. :-)
Greg
--
open(G,"|gzip -dc");$_=<<EOF;s/[0-9a-f]+/print G pack("h*",$&)/eg
f1b88000b620f22320303fa2d2e21584ccbcf29c84d2258084
d2ac158c84c4ece4d22d1000118a8d5491000000
EOF
------------------------------
Date: Mon, 27 Apr 1998 12:01:11 -0400
From: pudge@pobox.com (Chris Nandor)
Subject: Re: QRe: == vs. eq
Message-Id: <pudge-2704981201280001@ppp-17.ts-1.kin.idt.net>
In article <35436151.59D@tidalwave.net>, palincss@tidalwave.net wrote:
# However it is wrong, stupid, and prejudicial, as well as
# being needlessly derogatory. Personally, I have no
# problem with Tom or Abigail responding to someone like
# Kelby that they should RTFM, since they so richly deserve
# that response, but I do deeply and profoundly resent being
# lumped together such people based on the software I am
# using to read this newsgroup.
Instead, can we make fun of you for putting a 'Q' before the 'Re:' on your
subject line?
--
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: 27 Apr 1998 12:00:52 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: randal stars in merlin!
Message-Id: <x7hg3fckzv.fsf@sysarch.com>
i just spent a wonderful saturday evening bending elbows with and listening
to randal. his lecture on his troubles was educational, fun, scary and
serious.
last night i watched the first half of the miniseries merlin, and i
noticed an amazing coincidence. the actor (sam neill) playing the role
of merlin and randal look like they could be brothers! so our merlyn is
starring in merlin!
tell me if you think they look alike. maybe someone should publish on
the web side by side pictures of the two.
one important note: when i was watching randal, i was under the
influence, while watching the tube, i was sober. i wonder if that made
the similarity work.
uri, a fan of both
--
Uri Guttman ----------------- SYStems ARCHitecture and Software Engineering
Perl Hacker for Hire ---- 8 Years of Perl Experience, Available Immediately
uri@sysarch.com --------- Resume and Perl Example at http://www.sysarch.com
Use the Best Search Engine on the Net -------- http://www.northernlight.com
------------------------------
Date: Mon, 27 Apr 1998 16:00:44 GMT
From: phenix@interpath.com (John Moreno)
Subject: Re: REQ: Win32 POP3 client
Message-Id: <1d857ys.12jjsi51rjjqu1N@roxboro0-056.dyn.interpath.net>
Joel Rubin <jmrubin@ix.netcom.com> wrote:
> I'd like to see an example of a POP3 client, written in Perl, which
> takes mail from mail.mars.edu port 110, user john, pass abcde, and
> dumps anything which has "cyberpromo.*" anywhere in the header and
> puts all the other email in mail.txt.
>
> It can work with either of the two free Perl 5 interpreters written
> for Win32.
That's nice, I'd like to see several thousand dollars in my bank
account.
--
John Moreno
------------------------------
Date: 27 Apr 1998 16:35:47 GMT
From: Greg Bacon <gbacon@cs.uah.edu>
Subject: Statistics for comp.lang.perl.misc
Message-Id: <6i2c53$stl$2@info.uah.edu>
Following is a summary of articles spanning a 7 day period,
beginning at 20 Apr 1998 16:04:21 GMT and ending at
27 Apr 1998 06:55:49 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" e-mail address and name.
- Original Content Rating (OCR) is the ratio of the original content
volume to the total body volume.
- Please send all comments to Greg Bacon <gbacon@cs.uah.edu>.
Excluded Posters
================
perlfaq-suggestions\@mox\.perl\.com
Totals
======
Posters: 512
Articles: 1450 (570 with cutlined signatures)
Threads: 410
Volume generated: 2291.6 kb
- headers: 1007.9 kb (20,404 lines)
- bodies: 1189.4 kb (37,773 lines)
- original: 802.8 kb (27,545 lines)
- signatures: 92.8 kb (1,952 lines)
Original Content Rating: 0.675
Averages
========
Posts per poster: 2.8
median: 1.0 post
mode: 1 post - 324 posters
s: 6.6 posts
Posts per thread: 3.5
median: 3.0 posts
mode: 1 post - 115 threads
s: 3.7 posts
Message size: 1618.3 bytes
- header: 711.8 bytes (14.1 lines)
- body: 840.0 bytes (26.1 lines)
- original: 567.0 bytes (19.0 lines)
- signature: 65.6 bytes (1.3 lines)
Top 10 Posters by Number of Posts
=================================
(kb) (kb) (kb) (kb)
Posts Volume ( hdr/ body/ orig) Address
----- -------------------------- -------
92 147.0 ( 77.3/ 57.2/ 36.1) Tom Phoenix <rootbeer@teleport.com>
59 111.7 ( 40.7/ 58.7/ 40.2) mgjv@comdyn.com.au (Martien Verbruggen)
36 44.9 ( 24.6/ 20.2/ 10.6) jgloudon@bbn.com
34 54.5 ( 25.7/ 19.7/ 9.6) rjk@coos.dartmouth.edu
34 42.8 ( 21.4/ 19.5/ 13.2) Jonathan Feinberg <jdf@pobox.com>
29 51.8 ( 23.6/ 23.5/ 19.7) tchrist@mox.perl.com (Tom Christiansen)
28 40.0 ( 21.7/ 18.3/ 10.5) jdporter@min.net
27 50.6 ( 21.2/ 25.2/ 9.6) abigail@fnx.com
24 37.1 ( 15.0/ 22.0/ 15.0) cberry@cinenet.net (Craig Berry)
23 32.8 ( 14.5/ 18.2/ 10.8) Gellyfish@btinternet.com
These posters accounted for 26.6% of all articles.
Top 10 Posters by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Address
-------------------------- ----- -------
147.0 ( 77.3/ 57.2/ 36.1) 92 Tom Phoenix <rootbeer@teleport.com>
111.7 ( 40.7/ 58.7/ 40.2) 59 mgjv@comdyn.com.au (Martien Verbruggen)
54.5 ( 25.7/ 19.7/ 9.6) 34 rjk@coos.dartmouth.edu
51.8 ( 23.6/ 23.5/ 19.7) 29 tchrist@mox.perl.com (Tom Christiansen)
50.6 ( 21.2/ 25.2/ 9.6) 27 abigail@fnx.com
44.9 ( 24.6/ 20.2/ 10.6) 36 jgloudon@bbn.com
42.8 ( 21.4/ 19.5/ 13.2) 34 Jonathan Feinberg <jdf@pobox.com>
40.0 ( 21.7/ 18.3/ 10.5) 28 jdporter@min.net
37.1 ( 15.0/ 22.0/ 15.0) 24 cberry@cinenet.net (Craig Berry)
32.8 ( 14.5/ 18.2/ 10.8) 23 Gellyfish@btinternet.com
These posters accounted for 26.8% of the total volume.
Top 10 Posters by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.938 ( 11.0 / 11.7) 15 Quentin Fennessy <quentin@jihad.amd.com>
0.934 ( 1.7 / 1.8) 5 fl_aggie@thepentagon.com (I R A Aggie)
0.899 ( 3.4 / 3.7) 6 psf@euclid.jpl.nasa.gov (Peter Scott)
0.879 ( 7.6 / 8.6) 6 "Robert Friberg" <robban@it-konsult.com>
0.867 ( 3.9 / 4.5) 5 jll@skynet.be
0.867 ( 5.3 / 6.1) 7 scott@softbase.com
0.836 ( 19.7 / 23.5) 29 tchrist@mox.perl.com (Tom Christiansen)
0.818 ( 1.6 / 1.9) 7 beske@worldnet.att.net
0.786 ( 2.6 / 3.3) 5 smcdow@arlut.utexas.edu (Stuart McDow)
0.781 ( 15.5 / 19.9) 18 aml@world.std.com (Andrew M. Langmead)
Bottom 10 Posters by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Address
----- -------------- ----- -------
0.444 ( 3.2 / 7.1) 8 "Igor Krivokon" <igor.k@usa.net>
0.442 ( 3.0 / 6.8) 9 Reza Naima <newsgroups@reza.net>
0.432 ( 3.5 / 8.2) 7 Uri Guttman <uri@sysarch.com>
0.429 ( 6.5 / 15.1) 14 alecler@cam.org (Andre L.)
0.428 ( 7.0 / 16.3) 10 phenix@interpath.com (John Moreno)
0.395 ( 2.9 / 7.4) 7 ced@bcstec.ca.boeing.com (Charles DeRykus)
0.389 ( 1.7 / 4.3) 9 Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at>
0.382 ( 9.6 / 25.2) 27 abigail@fnx.com
0.349 ( 2.5 / 7.1) 11 kpreid@ibm.net (Kevin Reid)
0.324 ( 2.2 / 6.7) 8 Brandon Golm <br@ndon.com>
Top 10 Threads by Number of Posts
=================================
Posts Subject
----- -------
31 Defending Perl
25 spoiled noobie
22 Regular Expression to match a valid IP address
18 array elements -- how to exclude when reading in?
17 Removing spaces from a variable, how?
16 RMS should be invited to O'Reilly's "Free Software Summit"
16 Time : Year2000 & 2038 code question
12 WebMail Server ?
12 Just a thought...
12 Array / List question
These threads accounted for 12.5% of all articles.
Top 10 Threads by Volume
========================
(kb) (kb) (kb) (kb)
Volume ( hdr/ body/ orig) Posts Subject
-------------------------- ----- -------
56.2 ( 21.8/ 32.2/ 23.0) 31 Defending Perl
42.4 ( 15.0/ 26.3/ 13.4) 16 RMS should be invited to O'Reilly's "Free Software Summit"
35.2 ( 20.1/ 12.9/ 7.2) 25 spoiled noobie
34.5 ( 11.6/ 21.2/ 12.0) 16 Time : Year2000 & 2038 code question
34.4 ( 18.5/ 14.2/ 9.3) 22 Regular Expression to match a valid IP address
28.6 ( 13.3/ 14.5/ 8.0) 18 array elements -- how to exclude when reading in?
24.2 ( 13.0/ 10.3/ 7.2) 17 Removing spaces from a variable, how?
23.6 ( 8.4/ 14.4/ 7.6) 12 Just a thought...
22.3 ( 11.8/ 10.3/ 6.3) 12 WebMail Server ?
21.6 ( 9.4/ 11.1/ 5.3) 12 Array / List question
These threads accounted for 14.1% of the total volume.
Top 10 Threads by OCR (minimum of five posts)
==============================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.949 ( 5.5/ 5.8) 5 'wait' under perl5.004 (possibly a perl bug?)
0.908 ( 7.0/ 7.7) 8 beginnings....
0.863 ( 2.6/ 3.1) 6 Cron job and Date problem
0.830 ( 4.0/ 4.8) 5 System call in Perl not working
0.830 ( 5.8/ 7.0) 6 Short circuit predicates based on existence or definedness, not truth
0.810 ( 5.2/ 6.4) 8 perl and spaces in strings
0.810 ( 5.6/ 7.0) 5 socket input problems
0.809 ( 10.2/ 12.6) 11 Symbolic ref and angle opeator
0.806 ( 3.2/ 3.9) 5 foreach trouble
0.797 ( 4.3/ 5.4) 6 Free http perl cgi windows95 practice platform
Bottom 10 Threads by OCR (minimum of five posts)
=================================================
(kb) (kb)
OCR orig / body Posts Subject
----- -------------- ----- -------
0.500 ( 4.6 / 9.1) 9 Are there things NOT answered yet ?
0.496 ( 3.6 / 7.2) 6 Perl experts!! help me!!
0.492 ( 1.2 / 2.5) 5 Bye All :-)
0.486 ( 3.1 / 6.4) 6 Perl-only distribution (was Re: How do I build Linux from stratch?? (w/o distribution of course!!))
0.476 ( 5.3 / 11.1) 12 Array / List question
0.472 ( 2.1 / 4.5) 10 Eat my dust - Perl running on Windows 95
0.461 ( 2.8 / 6.2) 8 Hash ref slice syntax?
0.447 ( 2.0 / 4.4) 8 SendMail on NT
0.439 ( 3.7 / 8.5) 9 Pattern Matching on HighBit Characters
0.428 ( 3.0 / 7.1) 6 ANNOUNCE: Win32API::SerialPort Documentation
Top 10 Targets for Crossposts
=============================
Articles Newsgroup
-------- ---------
30 comp.lang.perl.modules
18 comp.os.linux.misc
17 gnu.misc.discuss
16 comp.mail.sendmail
14 comp.lang.perl
13 comp.os.linux.development.apps
11 comp.os.linux.development.system
11 comp.infosystems.www.servers.unix
11 comp.lang.javascript
11 de.comp.lang.perl
Top 10 Crossposters
===================
Articles Address
-------- -------
24 "news.seed.net.tw" <fangshen@kssh.tn.edu.tw>
9 petdance@maxx.mc.net (Andy Lester)
8 Chris Wertman <chrisw@webchamps.com>
8 Fain <mindmore@mindless.com>
8 terry <dont@spam.me>
8 ecl6ql@leeds.leeds.ac.uk (Q Li)
8 "Robert Friberg" <robban@it-konsult.com>
6 eugene@cs.umb.edu (Eugene O'Neil)
6 ilya@math.ohio-state.edu (Ilya Zakharevich)
6 David Lee Lambert <lamber45@EGR.msu.edu>
------------------------------
Date: Mon, 27 Apr 1998 17:52:34 +0100
From: Iain Gatt <iain.gatt@strath.ac.uk>
Subject: Syntax to make my hit counter work?
Message-Id: <3544B7D2.41C6@strath.ac.uk>
I want to write the code for my own hit counter rather than go to a 3rd
party and just get a banner of some sort. My method has involved useing
a hit counter implemented in perl (run on my Unix server) which gives a
simple numeric output, this is accessed via javascript to give a
graphical output. I am however failing miserably.
I'd appreaciate any help on how to get the hit counter
operational. My web address is
http://homepages.strath.ac.uk/~nau97177/
Iain.
------------------------------
Date: 27 Apr 1998 15:27:45 GMT
From: Nicolai Langfeldt <janl@math.uio.no>
Subject: w3mir 1.0.2
Message-Id: <6i285h$bb5$1@news.neta.com>
w3mir 1.0.2 has been released. This version should end all file
corruption.
w3mir is a full-featured web mirroring program. It can do anything
from copying or mirroring single files to mirror multipele sites and
edit the URLs so that the mirror is totaly browseable from a
web-server or on a filesystem (CD-ROM). W3mir does not have any
problems with frames, CGI, client-side-imagemaps, CSS or the like. It
mirrors it all. It works on Unix and win32 machines.
w3mir is available from $CPAN/authors/id/JANL/ and
http://www.math.uio.no/~janl/w3mir.
Fixes in 1.0.1:
* -fa option and corresponding configuration file directive works again.
* Added -nnc option and a corresponding configuration file directive.
It disables newline conversions, which could corrupt files the
Webserver mis-declares. The HOWTO explains the uses of -nnc
Fixes in 1.0.2:
* W3mir now only newline converts HTML files, all other files are
handled as binary. This should ensure file-integrety even when working
with mis-configured servers.
Regards,
Nicolai Langfeldt
------------------------------
Date: 27 Apr 1998 15:27:10 GMT
From: "Joseph H. Buehler" <jhpb@sarto.gaithersburg.md.us>
Subject: Wcl-2.7.3 uploaded for X11::Wcl
Message-Id: <6i284e$bb2$1@news.neta.com>
I just uploaded Wcl-2.7.3 to PAUSE. Compared to Wcl-2.7.2,
this version has been ported to RedHat 5.0 linux and swim motif
2.1. I also tested it under AIX 3.2.5, AIX 4.2 and HPUX 10, so
I don't think I broke anything compared to 2.7.2.
Wcl-2.7.3 is a library for generating GUI interfaces based on widgets
that use Xt. It allows widget trees and callbacks to be specified using
X resource files.
The X11::Wcl module provides access to the library from PERL, allowing
rapid generation of GUI interfaces using Xt toolkits such as Motif.
A trivial example supplied with the X11::Wcl tar.gz is attached.
Joe Buehler
#!/usr/bin/perl
#
# This is a simple demo of a Motif PushButton widget.
# It does not require Motif 2.0.
#
use X11::Wcl;
X11::Wcl::mainloop(
ARGV => ["XmPushButton", "-trrf"],
DELETE => \&delete_window,
EDITRES_SUPPORT => 1,
INITIAL_RESOURCES => \*DATA,
CALLBACKS => [
["buttonCB", \&buttonCB, "argument object"],
],
STARTUP => \&startup,
NEED_MOTIF => 1,
);
# called when window manager is used to close application
sub delete_window
{
print "closed by window manager\n";
}
# exit button was pressed
#
# $widget is the invoking widget, of type Widget
# $arg1 is the argument string appearing in the resource that caused
# this callback to be invoked
# $arg2 is the callback struct; it must be cast into the proper type
# using the proper constructor
# $arg3 is the argument from callback registration time; it is
# whatever PERL object was passed to X11::Wcl::WcRegisterCallback()
sub buttonCB
{
my($widget, $arg1, $arg2, $arg3) = @_;
print "exit button pressed\n";
exit(0);
}
# for application-specific startup actions
sub startup
{
my($toplevel, $app_context) = @_;
print "startup($toplevel, $app_context)\n";
}
__END__
MAIN
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
XmPushButton.wcChildren: form
! constants
*wclVerboseWarnings: True
!*wcPostCreateDumpResources: True
!*wcPreCreateDumpResources: True
!*wcTrace: True
*background: light gray
*foreground: black
*FontList:
-*-courier-bold-r-*-*-*-140-100-100-*-*-*-*
*form.WcCreate: XmForm
*form.WcChildren: button
!*form.width: 500
!*form.height: 500
*form.fractionBase: 1000
!*form.wcAfterChildren: WcPrintTree(*form)
*button.WcCreate: XmPushButton
*button.labelString: EXIT
*button.activateCallback: buttonCB()
*button.topAttachment: ATTACH_FORM
*button.leftAttachment: ATTACH_FORM
------------------------------
Date: Mon, 27 Apr 1998 16:54:48 GMT
From: jgloudon@hyssop.bbn.com.bbn.com (Jason Gloudon)
Subject: Re: weird problem with ie4
Message-Id: <slrn6k9e1h.j72.jgloudon@hyssop.bbn.com>
Mathijs Oosterom <thijs@esense.nl> wrote:
>Hi all,
>
>I have a very weird problem with Internet Explorer 4.
Follow this up on comp.infosystems.www.authoring.cgi,
as this is not a pewrl question.
--
Jason Gloudon
------------------------------
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 2429
**************************************
