[8774] in Perl-Users-Digest
Perl-Users Digest, Issue: 2392 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Apr 22 16:07:27 1998
Date: Wed, 22 Apr 98 13:01:46 -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, 22 Apr 1998 Volume: 8 Number: 2392
Today's topics:
Re: Regular Expression to match a valid IP address <jdporter@min.net>
Re: Remote Process Monitoring <jamesr@aethos.co.uk.nospam>
Re: Removing spaces from a variable, how? <quentin@jihad.amd.com>
Re: Removing spaces from a variable, how? <jdf@pobox.com>
Re: Replacement without counting return ???? <vallon@pearl.fi.bear.com>
Re: Sendmail Attach (Robert C. Helling)
Re: SendMail on NT <jkry3025@comenius.ms.mff.cuni.cz>
Re: SendMail on NT <jdf@pobox.com>
Short circuit predicates based on existence or definedn <glew@cs.wisc.edu>
Re: Spaces in directory names (Abigail)
Re: Spaces in directory names <rootbeer@teleport.com>
Re: spoiled noobie <jdf@pobox.com>
Re: Symbolic ref and angle opeator (Mark-Jason Dominus)
Re: techniques for tagging substitution areas in templa <rootbeer@teleport.com>
Re: techniques for tagging substitution areas in templa (brian d foy)
Re: There *IS* a visual IDE for Perl! <zeller@ips.cs.tu-bs.de>
Re: There *IS* a visual IDE for Perl! <jdf@pobox.com>
use foo or { do something else }... how? (Peter Scott)
Re: use foo or { do something else }... never mind! (Peter Scott)
What is OFFICIAL version of Perl FAQ? (jc22a70a0-Beyerl)
Re: What is OFFICIAL version of Perl FAQ? <jdf@pobox.com>
WWW security in a learning enviroment <k.thomson@scet.com>
Re: WWW security in a learning enviroment (brian d foy)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 22 Apr 1998 12:19:05 GMT
From: John Porter <jdporter@min.net>
Subject: Re: Regular Expression to match a valid IP address
Message-Id: <353DE1B4.5B95@min.net>
Bert Robbins wrote:
>
> Tom Christiansen wrote:
> >
> > In comp.lang.perl.misc,
> > Tony Curtis <Tony.Curtis+usenet@vcpc.univie.ac.at> writes:
> > :An IP address expressed in dotted-quad form consists of 4
> > :sequences of decimal digits, separated by `.'
> >
> > Not all valid IP addrs are dotted quads!
> >
>
> What is the basis for this assertion? I know that some interfaces
> to IP addresses allow an entry of "10.1" which the interface
> expands to "10.0.0.1".
It is "equivalent to", it does not "expand to".
10.1 is a valid IP address, and should be recognized so by any
test one writes. For that matter, 10.16777215 is a valid IP
address, and is equivalent to 10.255.255.255.
John Porter
------------------------------
Date: 22 Apr 98 15:54:31 GMT
From: "James Richardson" <jamesr@aethos.co.uk.nospam>
Subject: Re: Remote Process Monitoring
Message-Id: <01bd6e08$61645140$26c0a4c1@kitkat.aethos.co.uk>
Mike Schlienz <mike@sccs.com> wrote in article <353D2E0C.8FFB940F@sccs.com>...
> Does anyone know of a way to monitor processes running on a remote/network
> server? Thanx in advance for any info.
>
Yes, if you have HP MC/ServiceGuard installed, then you can
type cmviewcl -v, and it will show you if all the critical processes are running ok.
Did you want to know anything about Perl?
James
PS: Even if your question has nothing to do with perl, it would be helpful if you mentioned what OS you are using.
PPS: I seem to recall answering a similar question here only a week or two ago? Did you check DejaNews?
------------------------------
Date: 22 Apr 1998 13:40:14 -0500
From: Quentin Fennessy <quentin@jihad.amd.com>
Subject: Re: Removing spaces from a variable, how?
Message-Id: <xim3ef5g0oh.fsf@jihad.amd.com>
I built on Dan B's code and found different numbers.
First, let me say I ran Dan's code and the numbers were very similar.
Then I expanded the variables on which the s/// or tr/// were run to
be larger, (10K rather than 1800), with one variable including no
whitespace, while the other was 25% whitespace.
These runs show that tr is significantly slower for larger variables.
I love 'use Benchmark'.
use Benchmark;
my $nospaces = 'X' x 10000;
my $spaces = 'XXX ' x 2500;
timethese( 50000, {
'tr/// no spaces' => sub {
$nospaces =~ tr/ //d;
},
'tr/// w/ spaces' => sub {
$spaces =~ tr/ //d;
},
's/// no spaces' => sub {
$nospaces =~ s/ //g;
},
's/// w/ spaces' => sub {
$spaces =~ s/ //g;
},
});
OUTPUT:
Benchmark: timing 50000 iterations of s/// no spaces,
s/// w/ spaces, tr/// no spaces, tr/// w/ spaces...
s/// no spaces: 9 secs ( 8.82 usr 0.00 sys = 8.82 cpu)
s/// w/ spaces: 7 secs ( 6.65 usr 0.00 sys = 6.65 cpu)
tr/// no spaces: 20 secs (19.19 usr 0.00 sys = 19.19 cpu)
tr/// w/ spaces: 14 secs (14.41 usr 0.00 sys = 14.41 cpu)
--
Quentin Fennessy AMD, Austin Texas
Secret hacker rule #11 - hackers read manuals
------------------------------
Date: 22 Apr 1998 10:34:36 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: Sleep <mhchau@cse.cuhk.edu.hk>
Subject: Re: Removing spaces from a variable, how?
Message-Id: <btttan03.fsf@mailhost.panix.com>
[posted and mailed]
Sleep <mhchau@cse.cuhk.edu.hk> writes:
> Craig Berry <cberry@cinenet.net> wrote:
> > This is actually a much better job for tr:
>
> > $var =~ tr/ //d;
>
> what's the difference if we use :
>
> $var =~ s/ //g;
Speed.
#!//c/perl/bin/perl -w
use strict;
use Benchmark;
my $s = ' this string has a number of gratuitous spaces ';
sub use_tr { local $_ = $s; tr/ //d; }
sub use_s { local $_ = $s; s/ //g; }
timethese( 50000, {
'use_tr' => \&use_tr,
'use_s' => \&use_s,
});
__END__
Benchmark: timing 50000 iterations of use_s, use_tr...
use_s: 1 secs ( 2.13 usr 0.00 sys = 2.13 cpu)
use_tr: 1 secs ( 0.75 usr 0.00 sys = 0.75 cpu)
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: 22 Apr 1998 03:34:09 -0400
From: Justin Vallon <vallon@pearl.fi.bear.com>
Subject: Re: Replacement without counting return ????
Message-Id: <x6ed8eamhse.fsf@pearl.fi.bear.com>
Ah. Did you mean a perl one-liner? I thought you mean 'one-line of
output'.
Here's a degenerate comma implementation:
$var = "blubb";
($var =~ tr/b/k/, print "Replaced: $var\n");
Or the special feature:
$var = "blubb";
print "Replaced: $var\n" if $var =~ tr/b/k/;
$var = "nope";
print "Replaced: $var\n" if $var =~ tr/b/k/;
=>
Replaced: klukk
(No output if no replacement)
haert@wharp.rhein-main.de (Michael Haertfelder) writes:
> Suppose we have:
>
> $var = "blubb";
> print "Replaced: ".$var =~ tr/b/k/."\n";
> print $var."\n";
>
> the result will be:
>
> Replaced: 3
> klukk
>
> Is it possible to get
>
> Replaced: klukk
>
> as a oneliner ?
>
> Thanx in advance
>
> Michael
>
> ------------- Michael Haertfelder Frankfurt/Main, Germany ----------------
> ------------- http://odb.rhein-main.de/people/haertfelder/ ----------------
>
--
-Justin
vallon@bear.com
------------------------------
Date: 22 Apr 1998 18:21:47 GMT
From: helling@x4u2.desy.de (Robert C. Helling)
Subject: Re: Sendmail Attach
Message-Id: <6hlcfr$5vd$1@claire.desy.de>
InterRed (grupo@nevado.cui.edu.co) wrote:
: How can I send email with attach!...
: thanks!
You can also do it the hard way: Find the RFC where multipart mime messages
are described. You just need two or three header lines plus the usual mime
headers for each part. Actually, it's not that hard. Send me an email if you
want to receive a script that does it.
Robert
--
.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oOo.oO
Robert C. Helling Albert Einstein Institute Potsdam
Max Planck Institute For Gravitational Physics
and
2nd Institute for Theoretical Physics
DESY / University of Hamburg
Email helling@x4u2.desy.de Fon +49 40 8998 4706
<href=http://www.aei-potsdam.mpg.de/~helling>
------------------------------
Date: Wed, 22 Apr 1998 19:42:57 -0700
From: Jan Krynicky <jkry3025@comenius.ms.mff.cuni.cz>
Subject: Re: SendMail on NT
Message-Id: <353EAAB1.6BA@comenius.ms.mff.cuni.cz>
Cory Johnson wrote:
>
> No, But I did a very extensive search on perl.com and many other perl
> resources.
>
> Andy Lester wrote in message <6hidda$jmr$1@supernews.com>...
> >: : > I'm switching from a Unix system to a NT system and I have to convert
> all my
> >: : > perl cgi scripts over. I was wondering if there is a module I can
> use on NT
> >: : > that would replace Unix's "sendmail".
> >
> >I don't suppose you did a search in any searchengines on "sendmail and
> >NT".
> >
> >xoxo,
> >Andy
On http://www.perl.com
Reference
Mainand USENET News => http://reference.perl.com/query.cgi?mail
<EXCERPT>
Mail::Sender -- Module
An object oriented interface to sending SMTP mails through
a socket connection. Supports multipart messages. Works on Unix as
well as
under Windows (tested Solaris and WindowsNT 4.0).
Doesn't depend on any additional programs.
</EXCERPT>
Not that extensive I'd think.
Jenda
------------------------------
Date: 22 Apr 1998 10:48:59 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: "Cory Johnson" <coryj@i-check.net>
Subject: Re: SendMail on NT
Message-Id: <4szlamc4.fsf@mailhost.panix.com>
[posted and mailed to coryj@i-check.net ]
"Cory Johnson" <coryj@***NOSPAM***i-check.net> writes:
> No, But I did a very extensive search on perl.com and many other perl
> resources.
>
> Andy Lester wrote in message <6hidda$jmr$1@supernews.com>...
> >
> >I don't suppose you did a search in any searchengines on "sendmail and
> >NT".
One of the implications of Andy's brief message is that your question
(which concerns finding an NT sendmail workalike) does not concern the
perl language. That's why you won't find anything about it at
perl.com. (Or in this newsgroup!)
My advice: don't use an external program to send mail; use the
Net::SMTP module or one of the other modules that deal with mail.
You'll find these modules at
http://www.perl.com/CPAN-local/CPAN.html
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: Wed, 22 Apr 1998 11:44:20 -0500
From: Andy Glew <glew@cs.wisc.edu>
To: Mike Haertel <haertel@ichips.intel.com>, comp.database@cs.wisc.edu, glew@cs.wisc.edu
Subject: Short circuit predicates based on existence or definedness, not truth
Message-Id: <353E1E64.49D06520@cs.wisc.edu>
I am defining a language (a database sublanguage, if you care) loosely based on Perl.
One of the nicest things about Perl, I have found, is that it has existence and definedness
predicates; it has fairly good handling of undefined values (Perl undef), which is a very
convenient abstraction for databases where many entries or fields are missing.
This is rather like the NULL handling problem in databases. Perl's notation is more convenient, IMHO.
E.g. in Perl you can say the equivalent of
IF exists(variable) THEN variable ELSE other-value
(actually using the usual ?: syntax: (exists $hash{key} ? $hash{key} : $othervalue)
You can say
IF defined(variable) THEN variable ELSE othervalue
(defined $var ? $var : $othervalue)
as well as
IF variable THEN variable ELSE othervalue
($var ? $var : $othervalue)
This last has the convenient shorthand $var||$othervalue,
which saves having to type the expression that corresponds to $var twice.
(It is out of such small savings in typing that expressivity arises.)
Problem: Perl treats the undefined value "undef" as well as 0 as being equivalent
to 'false'. This is convenient in many situations, but not always.
One of my most frequent bugs in writing Perl is to write
($var||$othervalue)
when I have forgotten that $var may be a legitimate zero
- i.e. when I really mean
(defined $var ? $var : $othervalue)
IF defined(variable) THEN variable ELSE other value
Similarly for exists.
I believe that this error is encouraged by the conciseness of the $var||$other form,
compared to the verbosity of the full conditional expression.
I am therefore wondering if it might be useful to define (in my extended language)
shorthands for
IF defined(var) THEN var ELSE other
perhaps var ||| other
and similarly for the existence predicate var :|| other.
I solicit the advice of others who may have considered this issue:
language designers, Perl users, database users.
Suggestions as to the syntax seem desirable:
existsVar ||| other
existsVar :|| other
definedVar ::|| other
existsVar ||:: other
definedVar ||: other
truthVar || other
(Yes, I am aware ofg the conflict with SQL's || operator)
----
Please email responses; I don't read these newsgroups.
------------------------------
Date: 22 Apr 1998 18:51:59 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Spaces in directory names
Message-Id: <6hle8f$26p$1@client2.news.psi.net>
Jim Ray (james.a.ray2@boeing.com) wrote on MDCXCV September MCMXCIII in
<URL: news:MPG.fa7b5264e9bb1c5989680@news.boeing.com>:
++ I have a perl script that will be a list of files and directorys. It
++ works really good till you come to a direcory that has a space in it. I
++ am using HP/UX and perl 5.
Perl doesn't treat spaces in directories in any way different than
other characters. So, it must be somewhere in your code where you
go wrong. It might help if you tell what goes wrong. What do you
do? What do you expect Perl to do? And what is Perl doing? Without
that, we're just stabbing in the dark.
++ The results are the same when using Netscape as IE.
Eh? What do Netscape and IE have to do with it?
++ This is the code I use to fill the spaces with the right code.
++ "$dirname=~ s/ /%20/g; "
Well, if you want to replace spaces with %20, that seems ok to me.
++ Any help would be helpful.
I dunno. Please try to describe what your problem is.
Abigail
--
perl -e '$_ = q *4a75737420616e6f74686572205065726c204861636b65720a*;
for ($*=******;$**=******;$**=******) {$**=*******s*..*qq}
print chr 0x$& and q
qq}*excess********}'
------------------------------
Date: Wed, 22 Apr 1998 19:09:55 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Jim Ray <james.a.ray2@boeing.com>
Subject: Re: Spaces in directory names
Message-Id: <Pine.GSO.3.96.980422120404.6132i-100000@user2.teleport.com>
On Wed, 22 Apr 1998, Jim Ray wrote:
> I have a perl script that will be a list of files and directorys.
How can a perl script be a list of anything? But maybe I know what you
mean...
> It works really good till you come to a direcory that has a space in it.
That sounds like a bug!
> This is the code I use to fill the spaces with the right code.
> "$dirname=~ s/ /%20/g; "
What do you mean by 'the right code'? Perhaps that is 'the wrong code'.
:-)
If you're following the proper protocol but some browser or server doesn't
cooperate, then it's the other program's fault. If you're not following
the protocol, then it's your fault. If you aren't sure about the protocol,
you should read the protocol specification. If you've read it and you're
still not sure, you should ask in a newsgroup about the protocol.
> Any help would be helpful.
That's a tautology! :-)
Here's hoping that this is the helpful sort of help!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 21 Apr 1998 09:07:40 -0500
From: Jonathan Feinberg <jdf@pobox.com>
Subject: Re: spoiled noobie
Message-Id: <wwcjqndf.fsf@mailhost.panix.com>
kpreid@ibm.net (Kevin Reid) writes:
> $var =~ s/^\s*([^ ]*)\s*$/$1/;
>
> That's about as elegant as it gets.
>
> This will delete any kind of whitespace.
Errr, it won't even *match* strings with multiple words
" like this one "
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: 22 Apr 1998 14:34:19 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Symbolic ref and angle opeator
Message-Id: <6hld7b$aja$1@monet.op.net>
Keywords: Cobb crap Senegal tow
In article <xim90oyez0i.fsf@jihad.amd.com>,
Quentin Fennessy <quentin@jihad.amd.com> wrote:
>Are there other programming constructs that can be described as
>circumfix?
Zillions.
Perl:
"..."
'...'
qw(...)
[ ... ] # Array reference
$...[...] # Array element---Circuminterfix?
C:
/* ... */
... ...[...]; /* declaration */
... ...[] = { ... }; /* initialization */
struct ... { ... }; /* type declaration */
ML:
(* ... *) (* comment *)
[ ... ] (* list construction *)
COBOL:
DIVIDE ... BY ... GIVING ...
Blah blah blah. The only language I can think of offhand that
*doesn't* have a syntax like that is (surprise!) APL.
There is no language that I know that uses |EXPR| for absolute value,
which might or might not be a shame, depending on your sympathies.
------------------------------
Date: Wed, 22 Apr 1998 18:53:18 GMT
From: Tom Phoenix <rootbeer@teleport.com>
To: Dan Baker <dtbaker_@flash.net>
Subject: Re: techniques for tagging substitution areas in templates?
Message-Id: <Pine.GSO.3.96.980422115226.6132c-100000@user2.teleport.com>
On Wed, 22 Apr 1998, Dan Baker wrote:
> in cases where a small number of substitutions may be desired to an
> existing document in KNOWN areas... i.e. inserting auto-generated
> sections into a HTML or plain text template. What are some good
> techniques for tagging the areas to insert/substitute?
Use a module, like Text::Template. Hope this helps!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Wed, 22 Apr 1998 14:57:16 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: techniques for tagging substitution areas in templates?
Message-Id: <comdog-ya02408000R2204981457160001@news.panix.com>
Keywords: from just another new york perl hacker
In article <353E124C.36D4@flash.net>, dtbaker_@flash.net posted:
>in cases where a small number of substitutions may be desired to an
>existing document in KNOWN areas... i.e. inserting auto-generated
>sections into a HTML or plain text template. What are some good
>techniques for tagging the areas to insert/substitute?
there have been some pretty good response to this question in the
past, especially from the like of Elijah. you might check DejaNews [1]
for his (and other's) answers, as well as the various Text::* modules.
good luck :)
[1] DejaNews <URL:http://www.dejanews.com>
--
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 <URL:http://www.pm.org>
------------------------------
Date: 22 Apr 1998 12:02:03 +0200
From: Andreas Zeller <zeller@ips.cs.tu-bs.de>
Subject: Re: There *IS* a visual IDE for Perl!
Message-Id: <og67k2w4x0.fsf@infbssts.ips.cs.tu-bs.de>
Bruce Stephens <bruce@cenderis.demon.co.uk> writes:
> What are the chances of some nice Unix graphical debugger? (Caveat,
> I haven't tried the Perl/Emacs debugger thingy recently. What
> certainly used to be missing, and is missing for C/C++ debuggers too
> (with the honorable exception of DDD) is a really nice data
> examiner, letting me click on pointers to dereference them and
> things.)
In principle, it's not too difficult to extend DDD for other
command-line debuggers, such as the Perl debugger. If some Perl
expert is willing to do this work, feel free to contact me for further
information.
--
Andreas Zeller Technische Universitaet Braunschweig, Germany
DDD Maintainer mailto:ddd@ips.cs.tu-bs.de http://www.cs.tu-bs.de/~zeller/
------------------------------
Date: 21 Apr 1998 18:44:39 -0500
From: Jonathan Feinberg <jdf@pobox.com>
Subject: Re: There *IS* a visual IDE for Perl!
Message-Id: <n2deeo48.fsf@mailhost.panix.com>
seeker79@yahoo.com writes:
> I have been lurking around here for a while and have seen a number of people
> ask about editors/IDE's for Perl. I just wanted to post a note that I just
> found a complete IDE for Perl called "Perl Builder."
I downloaded it, tried it with the first program I had at hand (which
was some sample code I used in this newsgroup), and it gave some
spurious error message. It turns out that PB can't handle programs
with the __DATA__ construct in it. I tried to Edit->Copy the error
message from the STDERR screen, and was treated to an address error.
To their credit, the developers responded to my emails right away.
But I don't think I'll be picking PB over Emacs any time soon. I've
trashed it for now. It's definitely not ready for prime time.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: 22 Apr 1998 18:18:02 GMT
From: psf@euclid.jpl.nasa.gov (Peter Scott)
Subject: use foo or { do something else }... how?
Message-Id: <6hlc8q$fvn@netline.jpl.nasa.gov>
I want to write a script that has code conditional on whether a
module could be loaded. T'would be nice to be able to say:
if (use Whiz) {
use Whiz::Bang;
$Whiz = 1;
} else {
use Legacy;
$Whiz = 0;
}
# More code that tests $Whiz
As far as I can tell, what I need to do instead is something like:
BEGIN {
eval { require Whiz }
unless ($@) {
import Whiz;
use Whiz::Bang;
$Whiz = 1;
} else {
use Legacy;
$Whiz = 0;
}
}
Anyone tackled this before? Would be nice to know I was using a robust
idiom.
--
This is news. This is your | Peter Scott, NASA/JPL/Caltech
brain on news. Any questions? | (psf@euclid.jpl.nasa.gov)
Disclaimer: These comments are the personal opinions of the author, and
have not been adopted, authorized, ratified, or approved by JPL.
------------------------------
Date: 22 Apr 1998 18:31:45 GMT
From: psf@euclid.jpl.nasa.gov (Peter Scott)
Subject: Re: use foo or { do something else }... never mind!
Message-Id: <6hld2h$gvf@netline.jpl.nasa.gov>
Dang, right after I post my question, Tom Christiansen's answer to
the same question in another thread shows up in the spool. Must go
take another look at the arguments for the anthropic principle.
--
This is news. This is your | Peter Scott, NASA/JPL/Caltech
brain on news. Any questions? | (psf@euclid.jpl.nasa.gov)
Disclaimer: These comments are the personal opinions of the author, and
have not been adopted, authorized, ratified, or approved by JPL.
------------------------------
Date: 22 Apr 1998 08:48:46 GMT
From: db21@ih4gp756.ih.att.com (jc22a70a0-Beyerl)
Subject: What is OFFICIAL version of Perl FAQ?
Message-Id: <6hkate$mma@ssbunews.ih.lucent.com>
A lot of the discussion in this group centers around obtaining
and reading the Perl FAQ. While I don't have any problem with that
recommendation, I do have a problem with determining what is the latest
official version of same. In April of 1997, I saw and saved what was
presented as Ver. 4, dated 04/24/97 (I believe it was posted to this
group but it could have been in comp.answers). Today, when I go to one
of the sites listed in the "How to find the Perl FAQ" posting, all I
find is Ver. 3, dated 03/17/97. A comparison of the dates and version
numbers is as follows:
Ver. 3 Ver. 4
0 - 03/17/97 0 - 04/24/97
1 - 1.10 1 - 1.12
2 - 1.13 2 - 1.16
3 - 1.19 3 - 1.22
4 - 1.15 4 - 1.19
5 - 1.19 5 - 1.22
6 - 1.14 6 - 1.17
7 - 1.15 7 - 1.18
8 - 1.15 8 - 1.21
9 - 1.13 9 - 1.16
My question to the authors/maintainers is "What is OFFICIAL version
of Perl FAQ?" If your answer is Ver. 4, then why can I not get this
from the CPAN sites?
Dave Beyerl
------------------------------
Date: 22 Apr 1998 10:54:14 -0500
From: Jonathan Feinberg <jdf@pobox.com>
To: db21@ih4gp756.ih.att.com (jc22a70a0-Beyerl)
Subject: Re: What is OFFICIAL version of Perl FAQ?
Message-Id: <1zupam3d.fsf@mailhost.panix.com>
[posted and mailed]
db21@ih4gp756.ih.att.com (jc22a70a0-Beyerl) writes:
> A lot of the discussion in this group centers around obtaining
> and reading the Perl FAQ. While I don't have any problem with that
> recommendation, I do have a problem with determining what is the latest
> official version of same.
Most of the time, when someone says that an answer is in "the FAQ,"
they're referring to the FAQ lists that come with every Perl
distribution. So, if you have perl, you have the FAQs. They are
called perlfaq, and perlfaq1 through perlfaq9. They can be read with
perldoc on all platforms, and with man on platforms that support it.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: Wed, 22 Apr 1998 11:23:03 +0100
From: "Kevin James Thomson" <k.thomson@scet.com>
Subject: WWW security in a learning enviroment
Message-Id: <6hkgf4$htk@news5-gui.server.cableol.net>
Hello I'm new to this group and would like to ask a question on a topic
some of you might have come across. I am developing an learning environment
for students on the web that requires them to register to a www page then
obtain a username and password. Once logged on to the system they can browse
through the learning environment that includes a mail tool (for forums etc).
This is all done with Perl 5 and msql storing records of student information
etc.
The main problem is that students bookmarking a page can them have their
pages seen by another student that sits down at the computer. As information
is held in query strings uses as links.
for example /cgi-bin/mailbox.pl?user=$user&mailbox_number=$number.
When a custom page is dynamically created in html the students name and
mailbox number are substituted for the variables.
Can you suggest any methods that will give some kind of time out or scramble
variables so that the next student sitting at the machine cant get into
another user's mail box.
Kevin Thomson...
------------------------------
Date: Wed, 22 Apr 1998 14:42:17 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: WWW security in a learning enviroment
Message-Id: <comdog-ya02408000R2204981442170001@news.panix.com>
Keywords: from just another new york perl hacker
In article <6hkgf4$htk@news5-gui.server.cableol.net>, "Kevin James Thomson" <k.thomson@scet.com> posted:
>for example /cgi-bin/mailbox.pl?user=$user&mailbox_number=$number.
>Can you suggest any methods that will give some kind of time out or scramble
>variables so that the next student sitting at the machine cant get into
>another user's mail box.
see the HTTP specification (as referenced in the CGI Meta FAQ) for
resource expiration information. you might also consider using the
POST method. you should also see Nick Kew's tutorial about Login on
the Web, as referenced in the CGI Meta FAQ.
however, since all of this is unrelated to Perl, you would be better
off asking in comp.infosystems.www.authoring.cgi.
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 <URL:http://www.pm.org>
------------------------------
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 2392
**************************************
