[9575] in Perl-Users-Digest
Perl-Users Digest, Issue: 3169 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jul 15 19:07:55 1998
Date: Wed, 15 Jul 98 16:00:58 -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 Wed, 15 Jul 1998 Volume: 8 Number: 3169
Today's topics:
Re: ***Can no one answer this question????*** <pholser@nortel.com>
Re: cgi module confusion <gwynne@utkux.utk.edu>
Re: Chomp() on win32 and unix perl (Marc Haber)
client/server help 2 (Joseph M Carlton)
Re: copying softlinks <rick.delaney@shaw.wave.ca>
Has anyone ever made Comm.pl work? (Luke Diamand)
Re: Has anyone ever made Comm.pl work? <David.Boyce@fmr.com>
Re: Help with tutorial please... <rick.delaney@shaw.wave.ca>
Re: Help! MacPerl and STDIN (Eric Schissel)
How to tell if a scalar is a number? <tomko@xnet.com>
Re: input length?? (Michael J Gebis)
Re: input length?? (Steve Linberg)
localtime components <burkert@earthlink.net>
Re: localtime components (Larry Rosler)
Re: module help <quentin.fennessy@amd.com>
More musing on -w (Alan Barclay)
open2 and memory leak? <jhissong@csi.compuserve.com>
Re: Perl 4 compilation on Solaris 2.6 (Jonathan Stowe)
Re: Perl Beautifier Home Page (Ilya Zakharevich)
Perl for kids (jonathan seth hayward)
Re: Perl to PostgreSql problem <glynis@butterfly.hjsoft.com>
Reading RMS indexed files with perl <RC0705@email.sps.mot.com>
Re: Recipient Validation (brian d foy)
Re: Recipient Validation (John Stanley)
Re: Recipient Validation <*@qz.to>
Restricting refering domains access to script? <domainsource@usa.net>
Re: Restricting refering domains access to script? (brian d foy)
Re: The three properties of programmers (Bob Trieger)
Re: trying to install perl (Jonathan Stowe)
Re: use strict (Steve Linberg)
Re: Win NT Perl 5.0 Y2K compliance (Jonathan Stowe)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 15 Jul 1998 16:07:57 -0500
From: Paul Holser <pholser@nortel.com>
Subject: Re: ***Can no one answer this question????***
Message-Id: <35AD1A2C.2620@nortel.com>
Bryan T Hoch wrote:
>
> This posting was previously called:
> Re: Placing output from System() call into an array
> from the file that calls it?
> and I've posted the question about 3 times in the
> last month and half.
> Can someone who knows the answer PLEASE let me know?
> Thanks!
This brought to mind the following gem:
"There are two possibilities: they are unable to
respond; they are unwilling to respond."
"Wrath of Khan", I think? Trekkers, help me out here...
Anyhow, sorry your question didn't get answered.
These things happen. Your posts do not obligate
its readers in any way to assist you. Nothing
personal, that's just how it is.
Best of luck,
pholser
--
// Paul Holser ~ Northern Telecom, Inc. ~ pholser@nortel.com
// Wireless Automation Tool Development
// "Computer Science is no more about computers
// than astronomy is about telescopes." --E.W. Dijkstra
------------------------------
Date: Wed, 15 Jul 1998 17:11:35 -0400
From: "Bob Gwynne" <gwynne@utkux.utk.edu>
Subject: Re: cgi module confusion
Message-Id: <6oj64g$fvg$1@gaia.ns.utk.edu>
>For a comparison of these modules that I did for a talk last year, see
>this URL:
> http://www.bayview.com/mindsrc-talk/
>
Bill:
The link doesn't work at this time. In addition, the genome links
aren't working.
Investing in Lincoln Stein's Official Guide to Programming with CGI.pm is
worthwhile.
Bob Gwynne
------------------------------
Date: Wed, 15 Jul 1998 22:26:59 GMT
From: Marc.Haber-usenet@gmx.de (Marc Haber)
Subject: Re: Chomp() on win32 and unix perl
Message-Id: <6ojacr$5ec$3@nz12.rz.uni-karlsruhe.de>
drummj@mail.mmc.org (Jeffrey R. Drumm) wrote:
>On Wed, 15 Jul 1998 07:57:32 GMT, Marc.Haber-usenet@gmx.de (Marc Haber) wrote:
>>Imagine developing a perl script on a UNIX box while sitting at a
>>Windows machine's console. It is much more comfortable to have a
>>Windows editor editing the script file over a samba or NFS connection,
>>do a simple save, click over to the ssh connection to the UNIX box and
>>run the script instead of editing in the ssh window or saving locally
>>and then ftp'ing the script file over to the UNIX box.
>>
>>Greetings
>>Marc
>
>I do sit at a Windows NT machine while editing my Perl scripts. However, I use
>a reasonably decent X server on my system . . . Emacs, CPerl-mode, a bunch of
>xterms . . . the only thing that could make me happier would no doubt incense
>NT advocates. ;-)
Well, can you recommend a decent X server for WinNT that is free?
Also, how to behave when the Linux box is a 386DX that does not run X
for obvious performance reasons?
>But chomp() was the topic under discussion . . .
You are so right. I am merely pointing out that there are situations
when you are "forced" to do as "we" do.
Greetings
Marc
--
-------------------------------------- !! No courtesy copies, please !! -----
Marc Haber | " Questions are the | Mailadresse im Header
Karlsruhe, Germany | Beginning of Wisdom " | Fon: *49 721 966 32 15
Nordisch by Nature | Lt. Worf, TNG "Rightful Heir" | Fax: *49 721 966 31 29
------------------------------
Date: 15 Jul 1998 22:32:12 GMT
From: carltjm@mail.auburn.edu (Joseph M Carlton)
Subject: client/server help 2
Message-Id: <6ojalc$4u1$1@ultranews.duc.auburn.edu>
>From page 354 of Programming Perl:
"For example, let's say that you have a long running database server
daemon that you want folks from the World Wide Web to be able to
access, but only if they go through a CGI interface. You'd have a small,
simple CGI program that does whatever checks and logging you feel
like, and then acts as a Unix-domain client and connects to your private
server. "
This is EXACTLY what I need to do. But I don't know how to get the
client and server working. Someone please help. See also my other posts.
Thanks.
--
Joey Carlton
Senior, Computer Engineering
Auburn University
carltjm@mail.auburn.edu
------------------------------
Date: Wed, 15 Jul 1998 22:35:35 GMT
From: Rick Delaney <rick.delaney@shaw.wave.ca>
Subject: Re: copying softlinks
Message-Id: <35AD3014.27A53022@shaw.wave.ca>
Kin Cho wrote:
>
> Does someone has some quick Perl code to copy softlinks?
>
> That is:
>
> ln -s a b # point b at a
> perl cpln.pl b c d # I want c and d to point at a as well
>
perldoc -f symlink;
for (qw(b c d)){ symlink $_, 'a' or die "Can't link: $!\n" }
--
Rick Delaney
rick.delaney@shaw.wave.ca
------------------------------
Date: 15 Jul 1998 22:34:52 +0100 (BST)
From: lgd@champignon.atml.co.uk (Luke Diamand)
Subject: Has anyone ever made Comm.pl work?
Message-Id: <slrn6qq83s.glb.lgd@champignon.atml.co.uk>
Is it just me, or is Comm.pl completely broken? Is it possible at all to
setup a working equivalent of:
open( "|myprogram|" );
IPC::Open2 doesn't do the job, because of the buffering blues described in
the manual:-(
Luke Diamand
--
Virata http://www.virata.com
Cambridge
Tel: +44 1223 566919 Fax: +44 1223 566915
------------------------------
Date: Wed, 15 Jul 1998 22:07:33 GMT
From: David Boyce <David.Boyce@fmr.com>
Subject: Re: Has anyone ever made Comm.pl work?
Message-Id: <35AD2898.FEF1D467@fmr.com>
Luke Diamand wrote:
>
> Is it just me, or is Comm.pl completely broken? Is it possible at all to
> setup a working equivalent of:
>
> open( "|myprogram|" );
>
> IPC::Open2 doesn't do the job, because of the buffering blues described in
> the manual:-(
1. Comm.pl has been superseded by Expect.pm.
2. You might also try my module IPC::ChildSafe (CPAN, under DSB). This
works around the buffering problem iff you can identify a trivial
command for "myprogram", where a "trivial command" is one which is very
cheap and produces a predictable one-line output. For instance, the
shell is one such program since 'echo ++=eoc++' is one such trivial
command. IPC::ChildSafe works by sending this trivial command in back of
each real command, then reading output until it sees the trivial
command's result. As a bonus it allows you to register a function to be
applied to each command's results; normally this would use a regular
expression to determine success or failure.
Neither of these is currently ported to NT, as far as I know.
-David Boyce
------------------------------
Date: Wed, 15 Jul 1998 22:16:14 GMT
From: Rick Delaney <rick.delaney@shaw.wave.ca>
Subject: Re: Help with tutorial please...
Message-Id: <35AD2A25.59B43F2B@shaw.wave.ca>
Jonah Graham wrote:
>
>
> $, = "#"; # This sets the field separator to a pound.
> # That way a # will be printed between each element
> # of the array.
> print "", @lines;
>
> I believe your problem may have been that (I think) the webpage
> wrongly suggests using a $" instead of $,.
>
No, it suggests the variable that gives the prettier (and shorter) print
statement:
$" = '#';
print "#@lines";
{print "", @lines} reminds me of {print $scalar, "\n"}.
Yuk.
--
Rick Delaney
rick.delaney@shaw.wave.ca
------------------------------
Date: 15 Jul 98 21:31:59 GMT
From: schissel@adore.lightlink.com (Eric Schissel)
Subject: Re: Help! MacPerl and STDIN
Message-Id: <35ad1fcf.0@news2.lightlink.com>
Chris Nandor (pudge@pobox.com) wrote:
>In article <35a91098.0@news2.lightlink.com>, schissel@adore.lightlink.com
>(Eric Schissel) wrote:
># Perl5 for Dummies has a page on how to create a dialog box in MacPerl (a
># simple open box or a simple save box). I could check my own files for an
># example and send it along by email, if you want (email me if you need it).
>Yeah, but why would you buy that book, when it is wrong in so many places?
Because I didn't know it was wrong. (Time for a hasty DejaNews check...)
>Further, there is a perfectly good MacPerl book available for stuff like
>that. :-)
Yes- unfortunately pitched above my current level, but I will be
persistent. I'm glad the book is available online, though I do somewhat
wish it were in a more obviously searchable format.
-Eric Schissel
--
schissel@lightlink.com
http://www.lightlink.com/schissel ICQ#7279016
standard disclaimer
------------------------------
Date: 15 Jul 1998 22:49:57 GMT
From: Paul Tomko <tomko@xnet.com>
Subject: How to tell if a scalar is a number?
Message-Id: <6ojbml$lic$1@flood.xnet.com>
I admit to being a former C programmer. I am trying to determine the
easiest way to determine if a scalar contains all digits, or if it
compares some non-digit characters ; without of course, printing it out
and looking at it.
Thanks,
Paul
--
| Paul Tomko | P.O. Box 1382 |
| President | Bolingbrook, Illinois 60440 |
| Tomko Consulting, Incorporated | (630) 759-8799 |
| tomko@xnet.com | http://www.tomkoinc.com |
------------------------------
Date: 15 Jul 1998 20:54:23 GMT
From: gebis@albrecht.ecn.purdue.edu (Michael J Gebis)
Subject: Re: input length??
Message-Id: <6oj4tv$q5@mozo.cc.purdue.edu>
linberg@literacy.upenn.edu (Steve Linberg) writes:
}In article <35AD0846.D8D4B1A2@lincolninvestment.com>, Kerrie Etter
}<ketter@lincolninvestment.com> wrote:
}> I have a form (basically builds a resume) one field asks for a
}> description of current responsibilities.....
}> The input from the form (which is e-mailed to our recruiter) could be up
}> to 100 words - how do I "wrap" it so that it doesn't just run off the
}> page...
}What are you talking about? HTML? Why don't you read an HTML book, or
}post in an HTML newsgroup? Does this have anything to do with Perl? If
}so, what?
I suspect that Kerrie wanted to know about the existence of the module
Text::Wrap. Me no good with words, but the authors of the camel
(Stephen Potter et. al) (heehee) did a fine job explaining this module
on page 512.
On the other hand, maybe Kerrie was looking for a pure HTML solution.
In that case, Steve's exactly right (although a little harsh) when he
says that this isn't the right newsgroup for the question.
If you are still confused, spend the rest of the day at www.perl.com
reading the FAQ and the zazillions of excellent documents there. (You
can also find out what I mean by "the camel.")
--
Mike Gebis gebis@ecn.purdue.edu mgebis@eternal.net
------------------------------
Date: Wed, 15 Jul 1998 17:14:46 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: input length??
Message-Id: <linberg-1507981714460001@projdirc.literacy.upenn.edu>
In article <6oj4tv$q5@mozo.cc.purdue.edu>, gebis@albrecht.ecn.purdue.edu
(Michael J Gebis) wrote:
> On the other hand, maybe Kerrie was looking for a pure HTML solution.
> In that case, Steve's exactly right (although a little harsh) when he
> says that this isn't the right newsgroup for the question.
Well, I don't mean to be harsh, but I do want to be truthful.
It's been a long day.
Tom Phoenix must be an alien. Or a bot. How does he do it? :)
_____________________________________________________________________
Steve Linberg National Center on Adult Literacy
Systems Programmer &c. University of Pennsylvania
linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: Wed, 15 Jul 1998 17:00:19 -0400
From: "Richard Burkert" <burkert@earthlink.net>
Subject: localtime components
Message-Id: <6oj5a1$s3v$1@birch.prod.itd.earthlink.net>
How do I access the individual components of localtime? I want to be able
to assemble the date in my own format.
------------------------------
Date: Wed, 15 Jul 1998 14:27:02 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: localtime components
Message-Id: <MPG.1016be81bbc5bf17989718@nntp.hpl.hp.com>
[This followup was posted to comp.lang.perl.misc and a copy was sent to
the cited author.]
In article <6oj5a1$s3v$1@birch.prod.itd.earthlink.net> on Wed, 15 Jul
1998 17:00:19 -0400, Richard Burkert <burkert@earthlink.net> says...
> How do I access the individual components of localtime? I want to be able
> to assemble the date in my own format.
`perldoc -f localtime`. Use the function in list context.
--
Larry Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 15 Jul 1998 16:42:29 -0500
From: Quentin Fennessy <quentin.fennessy@amd.com>
Subject: Re: module help
Message-Id: <ximbtqq3i62.fsf@shaddam.amd.com>
`use' is the right answer. `use Module-name' will only load
the modules once. See `perldoc -f use' for all the details.
--
Quentin Fennessy AMD, Austin Texas
Secret hacker rule #11 - hackers read manuals
------------------------------
Date: 15 Jul 1998 21:19:55 GMT
From: gorilla@elaine.drink.com (Alan Barclay)
Subject: More musing on -w
Message-Id: <900537583.606828@elaine.drink.com>
I've been thinking more about '-w', and before I get too far into
this message, this is all hypothetical 'what if' stuff, but:
Should -w be split into different types of warnings?
We have several different sources of warnings:
1) Compile time, eg "sub a{};$a{a}=1"
2) Run time, eg "$a=undef;print $a"
3) warn command, eg "warn 'ing'" (Usually used in program);
4) carp command, eg "use Carp;carp 'ing'" (Usually used in modules);
(Question, any more?)
Right now, 1 & 2 are enabled by -w, and all can be disabled by defining
an appropriate __WARN__ handler, but (and correct me if I'm wrong) there
is no way for the handler to know the source of the error.
Currently $^W contains 0 or 1, depending on the -w flag. If this was
redefined to be a bitmap, and some available option was used to set
the bitmap (call it -L for sakes of discussion),this would allow the
follow
(1 = compile time, 2=run time, 4= warn, 8 = carp)
perl -w = Works as now
perl -w -L 15 = Exactly the same as above
perl -w -L 0xff = Exactly the same as above, but with setting last bits
perl -w -L 1 = Produce only compile time errors, warn & carps will be
supressed
perl -w -L 7 = Supress only carps
A second variable could be set to indicate the source of the warning,
which could be used in a custom __WARN__ function.
Any comments?
------------------------------
Date: Wed, 15 Jul 1998 21:19:06 +0000
From: Jason Hissong <jhissong@csi.compuserve.com>
Subject: open2 and memory leak?
Message-Id: <35AD1CCA.E67E0A00@csi.compuserve.com>
I am running a script that watches other scripts and restarts them when
they exit (in case an error occurs or something). I use the open2
function to start these programs back up. A simplified version of this
script is:
#!/usr/local/bin/perl
use IPC::Open2;
my($pid) = '';
$SIG{CHLD} = 'IGNORE';
# The main program loop
while(1){
# I would do checking here to see if the process is running,
# if not, then I call the open2 command. In this example,
# we are calling for every iteration to illustrate a point.
$pid = open2('OUTPUT', 'INPUT', 'date');
print <OUTPUT>; # Just to see if we are getting output
sleep 1; # To simulate other processing
close OUTPUT;
close INPUT;
}
Now this example is not very useful but pretend the date command is one
of the scripts I am watching for an exit. In this example, date will
exit immediately. In my real script, I am testing to see if the program
is running, if it isn't, I call open2 again in the main program loop.
But for sake of example, let us call date for each interation of the
loop.
When I run the program (ignoring the children spawned so we do not get
zombies) the memory will grow slowly at first, then after that you see
about a 4kb size increase every 15 to 30 seconds.
Is this normal? Is there any way around it?
Thanks in advance!
Jason Hissong
------------------------------
Date: Wed, 15 Jul 1998 22:58:01 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: Perl 4 compilation on Solaris 2.6
Message-Id: <35acf27e.5215183@news.btinternet.com>
On Mon, 13 Jul 1998 20:48:11 +0100, Andy Bold wrote :
>Brad Skrbec wrote:
>>
>> Has anyone successfully compiled version 4.036 on Solaris 2.6?
>> Thanks in advance for your help!
>>
>> Brad Skrbec
>> Lead Engineer
>> Motorola Inc
>
>I came across very similar problems under ICL DRS/NX on SPARC,
Sigh of reminiscence.
Strangely I never experienced any problems with that but there you go.
> which as
>far as I can tell, is a rebadged Solaris. (ICL have stated binary
>compatibility with Solaris 2.1 ...),
This is actually do with the compatability of ELF binaries on the same
hardware architecture. (SCO ELF Binaries will run on Linux with some
care - But Linux aint SCO )
> although my problems were with Perl
>5.004.04
>
>Anyway, I eventually traced all my problems to the version of the C
>compiler I was using. The default cc is a SVR4 version compiler (?),
>but there's also a UCB compiler in somewhere like /usr/ucb/cc or
>/usr/ucb/bin/cc. (Sorry that I can't be more specific, but I'm at home
>and I've not got access to the office server.)
>
You should have also a compiler called c89 which behaves in a far more
ANSI friendly way and will compile Perl with a few trivial warnings.
You probably need to find the binary yourself as its located in some
weird /opt/blah blah path ...
Anyhow why would you want to compile 4.036 ?
/J\
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 15 Jul 1998 22:44:59 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Perl Beautifier Home Page
Message-Id: <6ojbdb$fii$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to John Porter
<jdporter@min.net>],
who wrote in article <35ACFDB2.477B@min.net>:
> Nothing wrong with my logic, friend. (Not here, anyway.)
> reasons for saying it. perl implements Perl, period. It is a
> defining implementation.
> Sure. And so you have implementations of hundred(s?) of slightly
> different languages. I submit that any/all of them may legitimately
> be called by the name of Perl.
If you want to consider this as logical, and suffer the consequences,
so be it. As I know, other readers of this thread got my point, this
was all I wanted.
Ilya
------------------------------
Date: 15 Jul 1998 22:07:07 GMT
From: jhayward@students.uiuc.edu (jonathan seth hayward)
Subject: Perl for kids
Message-Id: <6oj96b$f0b$1@vixen.cso.uiuc.edu>
Hello, folks...
I would like to inquire about whether a resource exists before I write my own.
I have two twin twelve year old brothers, whom I'd like to introduce to
programming. My first thought was to try to start off teaching them to be
software engineers or craftsmen, but there's just too much of that to learn at
once and keep a child's interest. And that is probably how computer science
majors at a university should be taught -- if I were in charge of a CS
department, I would probably teach math and physics on the one hand to give a
solid theoretical background, and principles of software engineering on the
other, and only at a later stage introduce students to the nuts and bolts of
languages, syntaxes, etc. But I thought a bit about how I started to tinker
with computers when I was in middle school, and remembered something very
different. So I've decided to try another approach -- make them hackers and
tinkerers first, and then later worry about teaching them to make high quality
code. (They'll probably be more receptive to principles of bug prevention
after spending some time chasing stupid bugs.)
I started with BASIC on an Apple ][ series, with myriad GOTO statements and
other things that I shudder to think of now. In retrospect, I don't think it
did any real damage, and it did impart me with a valuable lesson -- tinkering
with computers is fun. And that is the sort of thing I want to teach my little
brothers -- principles of high quality programming can come later if and when
they want to do bigger projects,
I wanted to start in Java, thinking that the disciplined and structured
environment would be a good place to start -- and it is true that if they can
program well in Java, they will probably be able to program well in other
languages. (I still think that Java will probably be a good second language,
for a later stage, when they know how to hack software and I want to begin to
show them how to craft it.) But I've come to more of a "Let's walk before we
try to run" attitude. I think that BASIC served that purpose well for me -- it
is a language in which you can do easy things easily. And I believe that Perl
will serve that purpose well for them -- of course, Perl has a lot more room to
grow than BASIC, and it is a much more powerful language (appropriately called
Unix's Swiss Army Chainsaw), but I would also consider it a gentle and easy
language for beginners.
(I do not consider Perl a good language for intermediate programmers who should
be learning discipline, because Perl will let you do things badly without
complaining. That's what I'll use Java for. But Perl should be a good
language to return to after they've learned discipline in a structured
environment -- good to start off with and then later return to.)
I would like a text which would be helpful to me in teaching them to hack and
tinker. Most of the books I see are either intended to teach an expert who
already understands programming but does not know the specifics of Perl, or
else teach a nonprogrammer how to get something done -- ergo, a semi-guided
recipe that tells how to use a few specific commands. I want something that
more explains different elementary features of the language, and supports
people exploring what they can do. And I haven't been able to find any
resources of that sort.
What I see as appropriate is:
1: Have a brief preface with the OS nuts and bolts (UNIX in this case), about
changing directories and editing files, #!/usr/local/bin/perl, chmod, etc.
2: Explain: variables (without really introducing concepts of typing and
declaration, as they are slightly confusing)
print
input
conditionals, foreach loops (introducing lists and maybe hashes)
(Leaving out or downplaying mathematical concepts, which can be
explored later. *Maybe* have gotos explained.)
3: Maybe talk about subroutines. (This would be after they've experimented
with some of the other things enough that they should be able to grasp why
subroutines would simplify their lives.)
4: Talk about bugs as one of the facts of life; have a description of what the
n most common Perl error messages mean. Give hints for debugging, and
perhaps some suggestions that would prepare them to appreciate more
structure when they are ready -- saying "Doing such-and-such will greatly
simplify and prevent debugging" will be a much more meaningful statement
after several frustrating debugging sections.
5: Have, interspersed throughout the text, some sort of exercises less focused
on "Find a way to do X" than "Explore what you can do with Y" -- maybe have
a few sample programs to modify and expand. Some questions will be about
finding different ways to do something.
6: Maybe have a later section that introduces some software engineering
concepts, after they have begun programming, and are ready to deal with
them.
Do you know of any texts, in book form or on-web, that are good for teaching
this sort of tinkering and exploration? (It seems a goal somewhat different
from what other books are based on.)
I am inclined towards creating such a book, albeit a small and informal one,
and putting it on-web. (I can see a lot of one-size-fits-all books that don't
really work well anywhere, and some good books (ergo, the Camel book) which are
aimed at a specific audience which happens not to be my little brothers. But
none that seem good for helping a child learn to thinker.) If this specific
thing hasn't been done, or hasn't been done well, would you all be willing to
help me (providing feedback, recommendations, technical criticisms, etc.)?
Any reactions, criticisms, etc. to this general idea?
-Jonathan
------------------------------
Date: 15 Jul 1998 21:12:43 GMT
From: "John M. Flinchbaugh" <glynis@butterfly.hjsoft.com>
Subject: Re: Perl to PostgreSql problem
Message-Id: <6oj60b$cje$1@butterfly.hjsoft.com>
> In article <35ABED8F.15B@2lm.com>, Paula Gibb <paula@2lm.com> wrote:
>> The bad news: When I try to execute the Perl script from an HTML form
>> (read: from an HTML browser), I am receiving a server error.
>> Do I need to somehow indicate to the httpd server that I am doing a
>> database process, or is there something else that I am completely
>> missing?
please keep in mind that a query submitted thru the web server will be
executed with the uid of the running web server, so if `nobody' or `www'
runs the web server, that name will need a postgresql account, and
you'll have to grant that user appropriate access to the table.
--
____________________}John Flinchbaugh{______________________
| -> glynis@hjsoft.com <- john@cs.millersv.edu |
| glynis@netrax.net http://www.hjsoft.com/~glynis/ |
~~Powered by Linux: Reboots are for hardware upgrades only~~
------------------------------
Date: Wed, 15 Jul 1998 14:13:40 +0000
From: John Nguyen <RC0705@email.sps.mot.com>
Subject: Reading RMS indexed files with perl
Message-Id: <35ACB910.17FE@email.sps.mot.com>
Can perl read an RMS indexed file on the VMS platform? If so, which
modules do I need and where do I get them?
------------------------------
Date: Wed, 15 Jul 1998 17:05:36 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Recipient Validation
Message-Id: <comdog-ya02408000R1507981705360001@news.panix.com>
Keywords: from just another new york perl hacker
In article <35AD0EC4.E167A892@mediapromotion.ch>, "H.P. Buerki" <webmaster@mediapromotion.ch> posted:
>Tony Curtis wrote:
>>
>> Re: Recipient Validation, H <webmaster@mediapromotion.ch>
>> said:
>>
>> H> Hi how i can make for sure, that the Recipient Addresses
>> H> are valid on the Remote Server before i will send an
>> H> E-Mail.
>>
>> You can't. It's impossible.
>That's not an answer !!!
>
>You better don't write something than these!
>
>It's possible to validate an E-Mail Address via nslookup -q=mx and check
>trough the Servers manually via telnet an vrfy and so on.
>
>I don't think so that nobody had ever an Idea to automate this Process.
use MX records all you want, but you're not going to be using VRFY on
any system that i admin.
if you think you can solve this problem, give it a try. make sure
you can verify Eli's many addresses before you post that you've
solved the problem though.
--
brian d foy <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>
------------------------------
Date: 15 Jul 1998 21:42:38 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Recipient Validation
Message-Id: <6oj7oe$sk8$1@news.NERO.NET>
In article <7xemvmdemz.fsf@fidelio.vcpc.univie.ac.at>,
Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at> wrote:
>H> That's not an answer !!! You better don't write
>H> something than these!
>
>I didn't come here expecting a Monty Python sketch.
Nobody _expects_ a Monty Python sketch. Amongst our weaponry...
------------------------------
Date: 15 Jul 1998 21:25:48 GMT
From: Eli the Bearded <*@qz.to>
Subject: Re: Recipient Validation
Message-Id: <eli$9807151711@qz.little-neck.ny.us>
Keywords: from just another new york perl hacker
In alt.fan.e-t-b, brian d foy <comdog@computerdog.com> wrote:
> "H.P. Buerki" <webmaster@mediapromotion.ch> posted:
> >Tony Curtis wrote:
> >> H> Hi how i can make for sure, that the Recipient Addresses
> >> H> are valid on the Remote Server before i will send an
> >> H> E-Mail.
> >> You can't. It's impossible.
> >That's not an answer !!!
What part of "It's impossible" is not an answer?
> >You better don't write something than these!
I cannot parse this sentence.
> >It's possible to validate an E-Mail Address via nslookup -q=mx and check
> >trough the Servers manually via telnet an vrfy and so on.
This is a close approximation of working, but it is not fully
effective.
> >I don't think so that nobody had ever an Idea to automate this Process.
> use MX records all you want, but you're not going to be using VRFY on
> any system that i admin.
Not all mail servers know which addresses are valid at vrfy time.
> if you think you can solve this problem, give it a try. make sure
> you can verify Eli's many addresses before you post that you've
> solved the problem though.
Challenge: without sending mail figure out which of these addresses
are deliverable:
<.@qz.to>
<#@qz.to>
<!@qz.to>
<,@qz.to>
At least one is deliverable and at least one is not.
Elijah
------
"luser relay" is a fun way to keep sendmail from knowing valid addresses
------------------------------
Date: Wed, 15 Jul 1998 18:44:19 -0400
From: "David Thompson" <domainsource@usa.net>
Subject: Restricting refering domains access to script?
Message-Id: <6ojb4t$64l$1@winter.news.erols.com>
In a Unix perl script I want to (inside the script, not in the server
config) restrict the referring domains that can access a script. Is
that possible?
Thanks.
David
------------------------------
Date: Wed, 15 Jul 1998 18:47:01 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Restricting refering domains access to script?
Message-Id: <comdog-ya02408000R1507981847010001@news.panix.com>
Keywords: from just another new york perl hacker
In article <6ojb4t$64l$1@winter.news.erols.com>, "David Thompson" <domainsource@usa.net> posted:
>In a Unix perl script I want to (inside the script, not in the server
>config) restrict the referring domains that can access a script. Is
>that possible?
die if exists $killed_domains{$domain};
or you can be less drastic, but that's the idea.
good luck ;)
--
brian d foy <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>
------------------------------
Date: Wed, 15 Jul 1998 21:57:40 GMT
From: sowmaster@juicepigs.com (Bob Trieger)
Subject: Re: The three properties of programmers
Message-Id: <6oj8p2$1cl$1@ligarius.ultra.net>
Gordon Blair <devnull@interlog.com> wrote:
-> This seems like you're being impatient (3rd)
Whew! I thought it was `impotence'.
Bob Trieger
sowmaster@juicepigs.com
" Cost a spammer some cash: Call 1-800-400-1972
Ext: 1949 and let the jerk that answers know
that his toll free number was sent as spam. "
------------------------------
Date: Wed, 15 Jul 1998 22:58:04 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: trying to install perl
Message-Id: <35ad3101.21216429@news.btinternet.com>
On Tue, 14 Jul 1998 13:37:08 -0500, Yazan Moh'd Al-Issa wrote :
>Hi,
>
> I am trying to install perl on my digital dec alpha
>machine(OSF"UNIX"). After runing configure, I don't know whether perl is
>installed successfully or not, since I don't even know how the perl
>interface looks like(if any). when i type the command perl I recieve a
>blinking curser and that is it. I am gonna appreciate it if some one can
>help.
>
Er,
I guess that it probably is working. Its just waiting for some Perl
statements on STDIN. You probably want to check out the wealth of
documentation that is installed with Perl. "man perl" should start
you off.
/J\
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Wed, 15 Jul 1998 17:10:50 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: use strict
Message-Id: <linberg-1507981710500001@projdirc.literacy.upenn.edu>
In article <6oj4eu$5gg$3@marina.cinenet.net>, cberry@cinenet.net (Craig
Berry) wrote:
> Steve Linberg (linberg@literacy.upenn.edu) wrote:
> : use vars (qw {$line});
>
> Outer parens are superfluous. Use of braces as qw delimeters seems a bit
> potentially misleading (though perfectly OK, of course).
Yeah, but Tom uses them! :)
_____________________________________________________________________
Steve Linberg National Center on Adult Literacy
Systems Programmer &c. University of Pennsylvania
linberg@literacy.upenn.edu http://www.literacyonline.org
------------------------------
Date: Wed, 15 Jul 1998 22:57:59 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: Win NT Perl 5.0 Y2K compliance
Message-Id: <35aced07.3815584@news.btinternet.com>
On Tue, 14 Jul 1998 11:24:29 -0700, Michael Yee wrote :
>Hello,
>
>Does anyone know if Perl 5.0 for Windows NT 4.0 (SP3) is Year 2000
>compliant? Thanks,
>
Perl has no problem with the century transition, with the usual
caveats about the programmer introducing a problem. If you search
DejaNews and look at www.perl.com you will be able to read a vast
amount of discussion on the subject. However NT4 *does* have a problem
unless the patch y2kfix[ia].exe is applied - you'd better take that up
with Uncle Bill.
>Michael Yee
>Disney Worldwide Services, Inc.
>
No jokes about Mickey Mouse Operating Systems now.
/J\
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: 12 Jul 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 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3169
**************************************
