[7768] in Perl-Users-Digest
Perl-Users Digest, Issue: 1393 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Nov 30 22:14:38 1997
Date: Sun, 30 Nov 97 19:00:25 -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 Sun, 30 Nov 1997 Volume: 8 Number: 1393
Today's topics:
Re: 2 things are the same yet not equal. (Ilya Zakharevich)
Re: [BUG] Plain <> fails in Win32 native port (Gurusamy Sarathy)
AUTOLOAD problem with can() function in MailTools-1.100 <jstoner@interaccess.com>
Database help <jones-joe@usa.net>
Re: dbase IV files to comma delimited files (Mike King)
General Socket Questions. <w.stanton@auckland.ac.nz>
Re: Help! unexpected token (Martien Verbruggen)
Re: last straw in an array? (Jason Gloudon)
Re: newer than new to perl <luu_tran@geocities.com>
Outputting 100 lines at a time from a search (Bob Maillet)
Re: Passing LIST parameters to die() <markm@nortel.ca>
Re: perlop clarification request (Jonathan Feinberg)
Re: Please help with form script (Martien Verbruggen)
Re: Q: alternative to Perl? (Eric Harley)
Re: Q: Learning perl with no progr. experience <tchrist@mox.perl.com>
Re: Q: Learning perl with no progr. experience (Kirk Hilliard)
Re: Resource Kit Anomaly (Peter J. Schoenster)
Re: Resource Kit Anomaly <rra@stanford.edu>
Re: Resource Kit Anomaly <flavell@mail.cern.ch>
Re: Resource Kit Anomaly (Brandon S. Allbery KF8NH; to reply, change "void" to "kf8nh")
Re: Resource Kit Anomaly (Jeremy D. Zawodny)
setserial? <doane@best.com>
Re: SIG-signals (Martien Verbruggen)
Re: Trying to copy a file on winnt in perl... (Martien Verbruggen)
Window dies/string error <mhol003@stat.auckland.ac.nz>
Re: WWW Authenticate Header <jones-joe@usa.net>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 1 Dec 1997 00:03:59 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: 2 things are the same yet not equal.
Message-Id: <65sutf$fo9$1@agate.berkeley.edu>
In article <Pine.GSO.3.96.971130124028.8797F-100000@usertest.teleport.com>,
Tom Phoenix <rootbeer@teleport.com> wrote:
> On Sat, 29 Nov 1997, The White Rabbit wrote:
>
> > They both look the same when I output them (STDOUT).
>
> Here's my way to see what a variable really contains:
>
> print "foo in hex is ", unpack("H*", $foo), "\n";
Never forget about `x' command of the debugger.
DB<2> $x = "\a\b\r\na\b\a"
DB<3> x $x
0 "\cG\cH\cM\cJa\cH\cG"
Ilya
------------------------------
Date: 1 Dec 1997 01:51:43 GMT
From: gsar@engin.umich.edu (Gurusamy Sarathy)
Subject: Re: [BUG] Plain <> fails in Win32 native port
Message-Id: <65t57f$166@srvr1.engin.umich.edu>
[ copy of reply previously sent in response to a direct 'stealth' message ]
Message-Id: <199712010112.UAA15865@aatma.engin.umich.edu>
To: "Michael A. Chase" <mchase@ix.netcom.com>
cc: "Perl Bug Report" <perlbug@perl.com>,
"Gurusamy Sarathy" <gsar@engin.umich.edu>,
"Greg McDermid" <mcdermidg@acm.org>
Subject: Re: [BUG] Plain <> fails in Win32 native port
In-reply-to: Your message of "Sun, 30 Nov 1997 12:23:22 PST."
<199711302032.OAA18603@dfw-ix1.ix.netcom.com>
Date: Sun, 30 Nov 1997 20:12:54 -0500
From: Gurusamy Sarathy <gsar@engin.umich.edu>
On Sun, 30 Nov 1997 12:23:22 PST, "Michael A. Chase" wrote:
>Congratulations (I think). You appear to have found a bug in Win32
>native builds (Borland C++ at least) of the standard distribution. I am
>forwarding your message along with my results to perlbug@perl.com.
[...]
>Greg McDermid wrote in message <01bcfa60$fde92250$89ba0ccb@gregii>...
[...]
>>The problem is that if the input is a specified list of files, or
>>redirected input it works OK, but if I use wildcards it fails, e.g.
>perl
>>x.pl *.err, the error being like "Can't open *.err". Is there something
>>silly I missed here?
Not a bug, just a FAQ (which is not in any FAQ yet). Here's my
freshly canned FGA:
=head2 Why won't my perl understand wildcards in arguments?
The default command shells on DOS descendant operating systems (such
as they are) usually do not expand wildcard arguments supplied to
programs. They consider it the application's job to handle that.
This is commonly achieved by linking the application (in our case,
perl) with startup code that the C runtime libraries usually provide.
However, doing that results in incompatible perl versions (since the
behavior of the argv expansion code differs depending on the
compiler, and it is even buggy on some compilers). Besides, it may
be a source of frustration if you use such a perl binary with an
alternate shell that *does* expand wildcards.
Instead, the following solution works rather well. The nice things
about it: 1) you can start using it right away 2) it is more powerful,
because it will do the right thing with a pattern like */*/*.c
3) you can decide whether you do/don't want to use it 4) you can
extend the method to add any customizations (or even entirely
different kinds of wildcard expansion).
C:\> copy con c:\perl\lib\Wild.pm
# Wild.pm - emulate shell @ARGV expansion on shells that don't
use File::DosGlob;
@ARGV = map {
my @g = File::DosGlob::glob($_) if /[*?]/;
@g ? @g : $_;
} @ARGV;
1;
^Z
C:\> set PERL5OPT=-MWild
C:\> perl -le "for (@ARGV) { print }" */*/perl*.c
p4view/perl/perl.c
p4view/perl/perlio.c
p4view/perl/perly.c
perl5.004_02/win32/perlglob.c
perl5.004_02/win32/perllib.c
perl5.004_03/win32/perlglob.c
perl5.004_03/win32/perllib.c
perl5.004_531/win32/perlglob.c
perl5.004_531/win32/perllib.c
Note there are two distinct steps there: 1) You'll have to create
Wild.pm and put it in your perl lib directory. 2) You'll need to
set the PERL5OPT environment variable. If you want argv expansion
to be the default, just set PERL5OPT in your default startup
environment.
- Sarathy.
gsar@engin.umich.edu
------------------------------
Date: Sun, 30 Nov 1997 19:09:39 -0600
From: John Stoner <jstoner@interaccess.com>
Subject: AUTOLOAD problem with can() function in MailTools-1.1002
Message-Id: <34820E53.6B874863@interaccess.com>
I am having a problem with a CPAN library, specifically
MailTools-1.1002. The problem may be
of my own making: I am trying to use the library on my ISP, and I can't
do a complete install of the library on their server. I have it set up
under my own account, and I include the library this way:
#!/usr/bin/perl5 -I/web/cgi-bin/explore/MIME-tools-3.204/blib/lib
-I/web/cgi-bin/explore/MailTools-1.1002/blib/lib
-I/web/cgi-bin/explore/MIME-Base64-2.03/blib/lib
use MIME::Entity;
(Which seems to find all the libraries ok.) Now, I know this is
non-standard, but my ISP is not particularly helpful about installing
stuff.
Here's what's happenning: in the start process, AUTOLOAD gets called.
The AUTOLOAD for Mail::Field has these lines:
sub AUTOLOAD
{
my $method = $AUTOLOAD;
# code omitted here ...
$pkg->register($method)
unless(Mail::Field->can($method));#<<<<<<<<PROBLEM
goto &$AUTOLOAD;
}
When I go into the debugger, I execute these lines and get
Mail::Field::AUTOLOAD(/web/cgi-bin/explore/MailTools-1.1002/blib/lib/Mail/Field.
pm:427):
427: unless(Mail::Field->can($method));
DB<1>
Mail::Field::AUTOLOAD(/web/cgi-bin/explore/MailTools-1.1002/blib/lib/Mail/Field.
pm:403):
403: my $method = $AUTOLOAD;
100 levels deep in subroutine calls!
DB<1> p $AUTOLOAD
Mail::Field::can
DB<2>
It looks as though it's trying to AUTOLOAD 'can'. I don't think it
should be doing that. why is it doing that? Is it my own fault for
having this weird configuration? Can I fix it, or should I get a real
ISP?
--
--John Stoner
--jstoner@interaccess.com
--personal page: http://www.interaccess.com/explore/stoner
"I want you to organize my PASTRY trays ... my TEA-TINS are gleaming in
formation like a ROW of DRUM MAJORETTES -- please don't be FURIOUS with
me --" --Zippy the Pinhead
------------------------------
Date: Sun, 30 Nov 1997 17:10:51 -0700
From: JJ <jones-joe@usa.net>
Subject: Database help
Message-Id: <3482008B.1527@usa.net>
trying to grab info from form and save in a database if to be able to
search later any help?
was looking at selena sol database script but not sure, if I have to
have a database program or it will do everything
Thanks
JJ
------------------------------
Date: Mon, 01 Dec 1997 00:48:44 GMT
From: m.king.garbage@praxa.garbage.com.au (Mike King)
Subject: Re: dbase IV files to comma delimited files
Message-Id: <3482095e.414453252@news.ozemail.com.au>
On Sun, 30 Nov 1997 12:43:13 -0500, "Akira" <j.a.d.@worldnet.att.net>
wrote:
>Does anyone have a script that will take a dbase IV file and convert it to a
>comma delimited file using Perl 5??
No, but I have some 'C' code which I think will work for you.
The dBase format is very simple- just fixed width columns. The first
record in the file will give you the column names and widths.
Mike
------------------------------
Date: 01 Dec 1997 10:35:55 +1200
From: Worik Macky Stanton <w.stanton@auckland.ac.nz>
Subject: General Socket Questions.
Message-Id: <wk7m9qko1g.fsf@auckland.ac.nz>
Friends.
I have not been able to get the answers from faq's or the camel
book. My meta question is where can I get information about tcp socket
programming, specifically with perl, that goes a little deeper than
the Camel book (Programming PERL 2nd. Edition)?
The questions:
How should I use shutdown? (page 216 camel) When should I use close?
What is the difference for a socket?
What options should I set? (Using setsockopt page 214) How do Ijudge?
The IO::Socket package is not described in Camel, I have been using
Socket.pm (use Socket;) Should I switch? Why? How do I judge?
When I test opening and closing sockets quickly (on the same port)
with a variable amount of data sent in both directions while it is
open, I get a plethora of TIME_WAIT sockets (about 10) reported by
netstat on the server machine.
Proto Local Address Foreign Address State
TCP thismachine:12345 the.other.machine:2564 TIME_WAIT
TCP thismachine:12345 the.other.machine:2609 ESTABLISHED
TCP thismachine:12345 the.other.machine:2522 TIME_WAIT
TCP thismachine:12345 the.other.machine:2528 TIME_WAIT
TCP thismachine:12345 the.other.machine:2534 TIME_WAIT
TCP thismachine:12345 the.other.machine:2540 TIME_WAIT
TCP thismachine:12345 the.other.machine:2546 TIME_WAIT
TCP thismachine:12345 the.other.machine:2552 TIME_WAIT
TCP thismachine:12345 the.other.machine:2558 TIME_WAIT
Is this normal? How do I judge?
How do I interpret this?
The details.
I have been making good use of Socket.pm mainly on Windows 95 with a
smattering of UNIX and NT. I am developing a distributed simulation
application that coordinates the efforts of multiple PCs (and my one
or two unix machines) using tcp sockets.
I have been creating a socket as described in the Camel book for each
machine and using them like file handles. I use select to see if
there is any data to read, and read it if there is. Quite simple.
One machine, the Master, controls the machines doing the simulations,
the Slaves. On the slaves a batch file runs that starts a demon that
listens for the Master. When the master conntacts it the demon runs
until the Master has finished, closes its end, the dmon exits, the
batch file loops, restarts the demon.
Mostly things are working very well.
But from time to time a slave will sit listening, and the master will
constantly try to connect, and nothing will happen. Occasionally the
master will connect after 2 or 3 tries, other times not for 100's of
tries.
Worik Stanton
w.stanton@auckland.ac.nz
------------------------------
Date: 1 Dec 1997 00:25:38 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Help! unexpected token
Message-Id: <65t062$hou$2@comdyn.comdyn.com.au>
In article <347e1dd2.92788@netnews.nyu.edu>,
rqy1319@is4.nyu.edu (Ryuji Yokoyama) writes:
> @files = qw(
> aug.txt
> dec.txt
> );
>
> It works nicely in one program;however, I got an error message at the
> other program.
>
> ./search2.pl:syntax error near unexpected token 'qw('
> .search2.pl:./search2.pl:line 4 @files = qw('
Could you post the line before the one that you posted as well? Or
even better, all the lines before it? It might be an unterminated
string somewhere, or a missing semicolon.
Make sure to run perl with the -w flag, and include 'use diagnostics'
somewhere. That might give you some more info.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | That's not a lie, it's a terminological
Commercial Dynamics Pty. Ltd. | inexactitude.
NSW, Australia |
------------------------------
Date: 30 Nov 1997 22:28:08 GMT
From: jgloudon@bbn.remove.com (Jason Gloudon)
Subject: Re: last straw in an array?
Message-Id: <65sp9o$j5q$1@daily.bbnplanet.com>
: Yes, this is fine.
: But how did you know to look for it in the perldata manpage?
: This is one of the problems beginners encounter, I think, with PERL:
: we're constantly being referred to the FM, but it seems to me that you
: have to know quite a bit to make the perl man pages useful to you.
You get a book, or you give the simple looking ones a look over.
Jason Gloudon
------------------------------
Date: 30 Nov 1997 20:23:21 GMT
From: "Luu Tran" <luu_tran@geocities.com>
Subject: Re: newer than new to perl
Message-Id: <35764.516924537luutrangeocitiescom@207.217.241.109>
[posted and mailed]
On Sat, 29 Nov 1997, jennifer <tuia@msn.com> wrote:
>A message returns that says "this program cannot be run in dos mode".
>I thought that is where you run perl from a win95 system?
You can't run in in DOS mode; you have to run it in a DOS prompt (there's a
difference). Select Start | Run and enter c:\command. That should give
you a window with a C:\ prompt. cd to your perl and and run it as you did
before.
-- luu
http://www.bayscenes.com/np/mdonline/
Please remove the underscore _ in my address when replying by email
------------------------------
Date: Sun, 30 Nov 1997 19:14:25 -0500
From: bob@cafemedia.com (Bob Maillet)
Subject: Outputting 100 lines at a time from a search
Message-Id: <bob-3011971914260001@apt2.tiac.net>
I have written a perl script which searches the lines of a text file for a
certain string and prints out the lines that have been found..I am using a
count to display the number of lines found that match..what I would like
to do is output only 100 or so lines of text at a time..not just the first
100 but each hundred after that and so on.
Any ideas?
Bob
--
To get random signatures put text files into a folder called 3Random Signatures2 into your Preferences folder.
------------------------------
Date: 30 Nov 1997 15:39:14 -0500
From: Mark Mielke <markm@nortel.ca>
Subject: Re: Passing LIST parameters to die()
Message-Id: <lq1afemunf1.fsf@bmers2e5.nortel.ca>
pem@po.cwru.edu (Peter Murray) writes:
> According to the man page for die(), it takes a LIST as a parameter. When
> it gets to my handler, though, it comes out as a single scalar (all of the
> list values concatinated into one):
> $SIG{'__DIE__'}="handleDie";
> die ('Param1','Param2');
> sub handleDie {
> my(@params) = @_;
> print scalar(@params)." parameters found\n";
> print join('|',@params)."\n";
> exit;
> }
> Which outputs:
> 1 parameters found
> Param1Param2 at ./temp.pl line 3.
>
> Tried with 5.004_03 on Solaris 2.6 and 5.004_01 under Digital UNIX 4.0a.
> All examples I've seen of die() and associated handlers assume a single
> scalar as a parameter. Maybe there is a good reason for this?
When i first saw this... the most obvious reason i could think of was that
die() was behaving much the same as print() does... but when i went on to
say:
use English;
local $LIST_SEPARATOR = " A "; # Hey why not try them all?
local $ORS = "!\n";
local $OFS = " a ";
print "this is", "game";
die "this is", "game";
I got:
this is a game!
this isgame at - line 5.
It is kinda wierd behaviour. Any ideas anyone?
As well i've heard mention that some future version of perl will allow
one to die() with an object. The object could inherit from some generic
Exception class or similar. (Did larry wall suggest this? :-) )
die with NumericException(type => 'division by zero');
Where with() would be the method of FloatingPointException that does the
actual bless(). (The "constructor"? What do we call it in perl anyways...)
what a wonderful day in the neighbourhood...
mark
-- _________________________
. . _ ._ . . .__ . . ._. .__ . . . .__ | Northern Telecom Ltd. |
|\/| |_| |_| |/ |_ |\/| | |_ | |/ |_ | Box 3511, Station 'C' |
| | | | | \ | \ |__ . | | .|. |__ |__ | \ |__ | Ottawa, ON K1Y 4H7 |
markm@nortel.ca / al278@freenet.carleton.ca |_______________________|
------------------------------
Date: Sun, 30 Nov 1997 20:15:46 -0500
From: jdf@pobox.com (Jonathan Feinberg)
Subject: Re: perlop clarification request
Message-Id: <MPG.eebd9a7255c40219896a0@news.concentric.net>
[This followup was posted to comp.lang.perl.misc and a copy was sent to the cited author.]
I'll take a stab at some of these...
billg@networkapparel.com said...
> "@ones = (5) x @ones; # set all elements to 5"
The x operator examines its right operand in scalar context;
it wouldn't mean anything to look at the right operand in
list context. Therefore,
(5) x @ones
is exactly the same as
(5) x scalar @ones
It is idiomatic Perl to use contexts for brevity, as in
while (@an_array < 3) # implies while(scalar @array < 3)
{
push @an_array, q(There's no place like home.);
}
Re the binary comma op:
> "In a scalar context it evaluates its left argument, throws that value
> away, then evaluates its right argument and returns that value."
>
> What would be the purpose of that?
How about side effects (like assignment and output)?
> I thought that meant the following code would print 'Second' (it
> didn't). Could someone give me an example of it in use?
>
> $value = 'First', 'Second';
> print $value;
Due to the low precedence of the comma operator, that first statement
is equivalent to
($value = 'First'), 'Second';
If you pick up perlop again, you'll see the precedence table right at
the top. Furthermore, if you were to use the -w switch, you'd be
warned about the 'Useless use of a constant in void context'. You WILL
use the -w switch. You WILL.
> btw... IMVHO, a lot of the examples seem a bit advanced (and/or) Unix
> specific for an introductory example.
Nobody will disagree with you here. Perl did indeed grow out of the unix
culture. I highly recommend the book, "Learning Perl." Indeed, a Win32
version of the book has recently come out. Having said that, I'll say that
I use perl 5.004 in Win32, and %99.44 of the Camel book ("Programming Perl"),
applies just fine, and is great reading, besides.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: 1 Dec 1997 00:22:55 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Please help with form script
Message-Id: <65t00v$hou$1@comdyn.comdyn.com.au>
In article <347d198a.264396@news.ilstu.edu>,
wviecht@rs6000.cmp.ilstu.edu (Wolfgang Viechtbauer) writes:
[snip]
> print DATA (($in{question1} eq "") ? "9" : $in{question1});
[snip]
> I have checked the names of the variables, so that is not the problem.
> It must have something to do with the $in{var} eq "" thing .... but I
> can't figure it out.
Maybe you should also check the content of the variables?
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | I took an IQ test and the results were
Commercial Dynamics Pty. Ltd. | negative.
NSW, Australia |
------------------------------
Date: Sun, 30 Nov 1997 18:20:56 -0800
From: eharley@pacbell.net (Eric Harley)
Subject: Re: Q: alternative to Perl?
Message-Id: <eharley-3011971820560001@ppp-207-214-149-93.snrf01.pacbell.net>
> On Sat, 29 Nov 1997 10:47:36 -0800, "Xah" <xah@best.com> wrote:
>
> >Are there alternative languages comparable to Perl with respect to text
> >manipulation?
> >
> >I'm wondering because I'm not too thrilled by Perl's grammar, but need
> >Perl's text manipulation power.
You could always try Icon.
http://www.cs.arizona.edu/icon/www/index.html
Great text-munging language.
Just Another Perl Hacker
------------------------------
Date: 30 Nov 1997 20:53:56 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Q: Learning perl with no progr. experience
Message-Id: <65sjp4$t1s$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
fl_aggie@thepentagon.com (I R A Aggie) writes:
:+ I call it "panther". Everyone I have heard calling it anything
:+ has called it "panther".
:
:And according to the Colophon in the back, they'd all be wrong.
No. A black leopard *is* a panther. Note definition #2:
panther n 1: a large spotted feline of tropical America similar to the
leopard; in some classifications considered a member of the genus Felis
[syn: jaguar, Panthera onca, Felis onca] 2: a leopard in the black color
phase 3: large American feline resembling a lion [syn: cougar, puma,
catamount, mountain lion, painter, Felis concolor]
So whether a black cat is a cougar, a leopard, or a jaguar, it's still
a "panther".
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
If I allowed "next $label" then I'd also have to allow "goto $label",
and I don't think you really want that... :-) [now works in perl5!]
--Larry Wall in <1991Mar11.230002.27271@jpl-devvax.jpl.nasa.gov>
------------------------------
Date: 1 Dec 1997 02:10:08 GMT
From: kdh5j@weyl.math.Virginia.EDU (Kirk Hilliard)
Subject: Re: Q: Learning perl with no progr. experience
Message-Id: <65t6a0$20$1@murdoch.acc.Virginia.EDU>
[discussing the panther book]
I R A Aggie <fl_aggie@thepentagon.com> wrote:
> ... because O'Reilly always includes a descripton of the critter on
> the cover.
This is usually the case. I was disappointed to see that the
turquoise llama book that I gave my father had the colophon replaced
with the misplaced answers to ch6-ex2 and ch9-ex2. I would like to
think that this was a binding error. Is anyone else missing her
colophon?
Kirk Hilliard
------------------------------
Date: Sun, 30 Nov 1997 22:58:20 GMT
From: pschon@baste.magibox.net (Peter J. Schoenster)
Subject: Re: Resource Kit Anomaly
Message-Id: <3481eb7f.91385475@news.magibox.net>
[courtesy cc of this posting sent to cited author via email]
Tom Christiansen <tchrist@mox.perl.com> wrote:
> [courtesy cc of this posting sent to cited author via email]
>
>In comp.lang.perl.misc,
> pschon@baste.magibox.net (Peter J. Schoenster) writes:
>:And now O'Reilly is putting out this package and there is no website
>:at all!
>
>You mean a set of web resources dedicated to some aspect of the PRK?
>Perhaps you might elaborate on what you'd like to see on such a site.
Please recognize this as my criticism of ORA's marketing of PRK and
nothing more.
All I want to know is what is in the book before I buy it. "A whole
bunch of good modules" just doesn't cut it. I don't need a FIXED
version of CPAN; I much prefer the live online version. If this book
is just a snapshot of CPAN then I have to ask why have the internet?
I really liked Phillip Greenspun's approach:
(from http://demo.webho.com/)
"Before diving into all of this crud, you might want to read the
on-line edition of the book or maybe even buy a copy so that I can
make $1.50. You might also want to arm yourself with some of the nerd
books that I recommend. "
I am sure some folks at Macmillan were worried about this; as if they
worried that potential buyers would not buy the book when so much
information was available for free.
It would only take a good person a few hours to put up a TOC and
perhaps a sample chapter or two. I would not want to see any samples
of programs but I remember once I had troulbe implementing Sprite
which I found in a book. I went to the author's website (he had one)
and he had all the easy stuff there but no implementation of Sprite
(which was easy enough on just reading but not so in
updating/modifying).
And of course then ORA sends me this thing in the mail that if I buy
10 more books in a year I will get something for free. Odd, really
odd.
But then I am not your normal consumer. When I go into a bookstore I
do not want to just pick up some shrink-wrapped book and ask the clerk
if this book will be good for me. I go into a bookstore and I open
the book and read. I might buy a book and then bring it back and
demand my money back. I had one manger tell me that it wasn't allowed
because people might just xerox the book and return it. What a joke.
I happend to have a bookstore once (In Rio de Janeiro) and I always
allowed people to bring back books they didn't like for whatever
reason. I was in the book business; I bought and sold books whether
new or used.
Sorry for wasting your time but you asked. It seemed obvious to me:
just a toc and some sample chapters. I don't buy shrink-wrapped
books.
Peter
------------------------------
Date: 30 Nov 1997 16:11:57 -0800
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Resource Kit Anomaly
Message-Id: <m3pvnhudki.fsf@windlord.Stanford.EDU>
Peter J Schoenster <pschon@baste.magibox.net> writes:
> All I want to know is what is in the book before I buy it. "A whole
> bunch of good modules" just doesn't cut it. I don't need a FIXED
> version of CPAN; I much prefer the live online version. If this book is
> just a snapshot of CPAN then I have to ask why have the internet?
The Perl Resource Kit contains a variety of different things, including
the POD documentation for a number of modules printed and bound into a
book, which some people may find much more readable and/or a better
reference. One of the things that it does contain is a CD with Perl 5.004
and a snapshot of CPAN.
I agree with you, I'd never use a snapshot of CPAN. But then, I'll bet
that you and I both have a few things in common: We have easy access to
the Internet, enough bandwidth to download what we want, and management
who doesn't break out in hives at the mention of downloading software off
the net.
One of the things that having all that stuff on CD can be good for is if
you have a company that has a passion about *buying* software. They may
not be willing to use Perl or the CPAN modules if they have to download
them off an ftp site, but if they can go out and buy a package and get a
CD with everything on it, that may make them feel better.
Another point to remember is that not everyone has free or cheap access to
ftp sites; some sites have very restrictive firewalls, very slow net
connections, or aren't connected to the Internet at all. For those
people, a CD may be just what they want.
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: Mon, 1 Dec 1997 01:48:38 +0100
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Resource Kit Anomaly
Message-Id: <Pine.A41.3.95a.971201013930.29004A-100000@sp056>
On 30 Nov 1997, Russ Allbery wrote:
> One of the things that having all that stuff on CD can be good for is if
> you have a company that has a passion about *buying* software. They may
> not be willing to use Perl or the CPAN modules if they have to download
> them off an ftp site, but if they can go out and buy a package and get a
> CD with everything on it, that may make them feel better.
It's a funny old world, isn't it? After many years experience in
computing, I have no qualms about downloading software from a number of
trusted sources. But much of the commercial software that reaches me
scares me to heck, especially the applications that have been developed
by the vendor of the operating system (I guess you can work out which
one I mean). Pretty well every new version of an application, when
installed, seems to make some incompatible change to the behaviour of
the OS and its UI.
> Another point to remember is that not everyone has free or cheap access to
> ftp sites; some sites have very restrictive firewalls, very slow net
> connections, or aren't connected to the Internet at all. For those
> people, a CD may be just what they want.
For sure, that's a fair comment.
------------------------------
Date: Sun, 30 Nov 97 20:53:46 -0500
From: bsa@void.apk.net (Brandon S. Allbery KF8NH; to reply, change "void" to "kf8nh")
Subject: Re: Resource Kit Anomaly
Message-Id: <34821902$2$ofn$mr2ice@speaker>
In <3480792e.8653883@woody.wcnet.org>, on 11/29/97 at 08:27 PM,
jzawodn@wcnet.org (Jeremy D. Zawodny) said:
+-----
| >Personally, like most of you, I already own a lot of
| >O'Reilly books, but I won't rule out wanting to buy 10 more over the next
| >year. They're good.
| Agreed. They are good. I, however, am unlikely to buy 10 more in the next 12
| months. I've already got about 8 books on my stack of books to read. :-(
+--->8
[*Only* 8? Must be nice....]
I don't see the problem, either. Think companies, not individuals.
--
brandon s. allbery [Team OS/2][Linux][JAPH] bsa@void.apk.net
cleveland, ohio mr/2 ice's "rfc guru" :-) KF8NH
"Never piss off a bard, for they are not at all subtle and your name scans to
`Greensleeves'." ---unknown, quoted by Janet D. Miles in alt.callahans
------------------------------
Date: Mon, 01 Dec 1997 02:29:00 GMT
From: jzawodn@wcnet.org (Jeremy D. Zawodny)
Subject: Re: Resource Kit Anomaly
Message-Id: <3482206a.117001088@woody.wcnet.org>
[original author automagically cc'd via e-mail]
On Sun, 30 Nov 97 20:53:46 -0500, bsa@void.apk.net (Brandon S. Allbery
KF8NH; to reply, change "void" to "kf8nh") wrote:
>In <3480792e.8653883@woody.wcnet.org>, on 11/29/97 at 08:27 PM,
> jzawodn@wcnet.org (Jeremy D. Zawodny) said:
>+-----
>| >Personally, like most of you, I already own a lot of
>| >O'Reilly books, but I won't rule out wanting to buy 10 more over the next
>| >year. They're good.
>| Agreed. They are good. I, however, am unlikely to buy 10 more in the next 12
>| months. I've already got about 8 books on my stack of books to read. :-(
>+--->8
>
>[*Only* 8? Must be nice....]
Eight that I've actually spent $$$ on and have sitting next to me.
Of course, there are about 25 more on my ever-growing list of "Books
to Buy and Read... Someday"
Amazon.com is very cruel. They have implemented a new feature called
"one-click ordering". Believe me, it's just that easy.
*sigh*
Oh, well...
Jeremy
--
Jeremy D. Zawodny jzawodn@wcnet.org
Web Server Administrator www@wcnet.org
Wood County Free Net (Ohio) http://www.wcnet.org/
------------------------------
Date: 30 Nov 1997 14:10:24 -0800
From: Jay Doane <doane@best.com>
Subject: setserial?
Message-Id: <m2wwhqowxb.fsf@gaia.logx.com>
Hi all,
Is there a module from which I can set the baud rate of a serial line
from perl?
I want to control X10 devices, which respond to a baud rate of 600,
and would like to write a standalone app that does not rely on
setserial, etc. Anyone done this?
Thanks,
--
Jay Doane | Online Partners, San Francisco | doane at best dot com
------------------------------
Date: 1 Dec 1997 00:31:06 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: SIG-signals
Message-Id: <65t0ga$hou$3@comdyn.comdyn.com.au>
In article <65jvuq$tbm@dos.canit.se>,
sap1d@canit.se (Johan Dalstrom) writes:
> Hey..
>
> I'm writing a little password-protection-script in perl..
>
> It's working fine with one exeption.. You can press ^Z to
> put the program in the background and then kill it.
>
> Is there a SIG-signal for ^Z so i can disable that function?
look in the perlvar manpage for the %SIG hash. Also look at the man
page for sigvec on your system. perl cannot do more than your flavour
of unix allows, so you'll have to go with that. Also look into stty(1)
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | In a world without fences, who needs
Commercial Dynamics Pty. Ltd. | Gates?
NSW, Australia |
------------------------------
Date: 30 Nov 1997 23:43:05 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Trying to copy a file on winnt in perl...
Message-Id: <65stm9$hka$1@comdyn.comdyn.com.au>
In article <347E41EE.A22FA211@no.junk.mail>,
Jaime Metcher <metcher@no.junk.mail> writes:
> This may be reprehensibly low-tech (and non-portable) of me, but in the
> spirit of social engineering:
>
> `copy file1 file2`; # Not forgetting to double-backslash any path
> separators
>
> Jaime Metcher
And in the spirit of portable engineering :)
use File::Copy;
copy("file1", "file2");
Should work everywhere.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | That's not a lie, it's a terminological
Commercial Dynamics Pty. Ltd. | inexactitude.
NSW, Australia |
------------------------------
Date: Mon, 01 Dec 1997 11:26:29 +1300
From: Mark Holmes <mhol003@stat.auckland.ac.nz>
Subject: Window dies/string error
Message-Id: <3481E815.54E4@stat.auckland.ac.nz>
When I submit a form for processing, 9 times out of 10 it works fine,
but every now and then either the netscape window either vanishes or I
get the error:
A network error occurred while Netscape was sending data.
(Network Error: XP_GetBuiltinString 7014 not found).
Try connecting again.
This only seems to be the case using Netscape 3, the program appears to
run fine 100% of the time using Netscape 4.
Any idea what kind of bugs in my program could lead to this kind of
error or what can be done about it? (- my programming and technical
knowledge is fairly limited, so I don't even know whether the prolem is
my program or not.)
Thanks in advance.
------------------------------
Date: Sun, 30 Nov 1997 18:09:26 -0700
From: JJ <jones-joe@usa.net>
Subject: Re: WWW Authenticate Header
Message-Id: <34820E46.1506@usa.net>
Thomas Arnold wrote:
>
> Problem: In my cgi script I issue a status code 401 (Unauthorized
> Request) and a www-authenticate request header. This causes the client
> browser to display a dialog box asking for user name and password. The
> browser sends the same request again, together with the entered user
> name and password. But here's the problem: I don't get back those
> variables into my program. I haven't found the user name and password
> in the environment variables or in standard input. I need them to
> check authentication.
> Does anybody have some information or help on that?
> Thanks.
>
> Tom Arnold
------------------------------
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 1393
**************************************
