[15969] in Perl-Users-Digest
Perl-Users Digest, Issue: 3381 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 15 21:05:32 2000
Date: Thu, 15 Jun 2000 18:05:19 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <961117519-v9-i3381@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 15 Jun 2000 Volume: 9 Number: 3381
Today's topics:
Re: A Computer Programmers Profile (Jerome O'Neil)
Re: A Computer Programmers Profile <shawnball@uswest.net>
Re: A Computer Programmers Profile <smerr612@mailandnews.com>
Re: A Computer Programmers Profile <shawnball@uswest.net>
Re: A Computer Programmers Profile <shawnball@uswest.net>
Re: A Computer Programmers Profile <shawnball@uswest.net>
Re: A Computer Programmers Profile <shawnball@uswest.net>
Re: A Computer Programmers Profile (Tad McClellan)
Re: Bot for this group to auto-answer queries? (John Stanley)
bug with arrays? <alager@csuchico.edu>
Re: bug with arrays? <samay1NOsaSPAM@hotmail.com.invalid>
Re: bug with arrays? (Gary E. Ansok)
Re: bug with arrays? <alager@csuchico.edu>
Re: bug with arrays? <samay1NOsaSPAM@hotmail.com.invalid>
Re: bug with arrays? <uri@sysarch.com>
Re: bug with arrays? <tony_curtis32@yahoo.com>
Re: bug with arrays? <lauren_smith13@hotmail.com>
Re: bug with arrays? (Joe Petolino)
Re: bug with arrays? <lauren_smith13@hotmail.com>
Re: bug with arrays? <tony_curtis32@yahoo.com>
Re: Can Perl use SSL or HTTPS protocol? <rootbeer@redcat.com>
can't get CGI.pm to autoEscape ? <tony_curtis32@yahoo.com>
Re: CGI textarea conversion code <rootbeer@redcat.com>
Re: CGI.pm newbie question <flavell@mail.cern.ch>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 15 Jun 2000 22:30:51 GMT
From: jerome@activeindexing.com (Jerome O'Neil)
Subject: Re: A Computer Programmers Profile
Message-Id: <vOc25.847$M85.41155@news.uswest.net>
Russ Jones <russ_jones@rac.ray.com> elucidates:
> And you should see what my spell checker wanted to do with "Ferk."
Exerc some children and then kill them?
------------------------------
Date: Thu, 15 Jun 2000 18:24:26 -0700
From: "Ferk Da Jerk" <shawnball@uswest.net>
Subject: Re: A Computer Programmers Profile
Message-Id: <Sjd25.146$lY4.6940@news.uswest.net>
Drew Simonis <care227@attglobal.net> wrote in message
news:3948E11C.42BA9477@attglobal.net...
> Ferk Da Jerk wrote:
> >
> > If your looking for a great worker I can do it and I need much money.
At
> > least $15 per hour.
>
>
> Boy I'd love to be 14 again.
Yeah 14 is a great age. All you do is think how to rule the world, become
rich, and about the opposite sex. It's just great.
------------------------------
Date: Thu, 15 Jun 2000 23:00:31 GMT
From: Steven Merritt <smerr612@mailandnews.com>
Subject: Re: A Computer Programmers Profile
Message-Id: <8ibn66$kbk$1@nnrp1.deja.com>
In article <39494B38.2D9C812C@rac.ray.com>,
Russ Jones <russ_jones@rac.ray.com> wrote:
> Ferk Da Jerk wrote:
>
> > If your looking for a great worker I can do it and I need much
money. At
> > least $15 per hour.
> >
>
> Jeez you little wiener! Why don't you just pay THEM to work! I
> couldn't even keep myself in Maalox on $15 per hour!
Agreed. Triple it and you may be able to attract good programmers,
depending on the cost of living in your area of course. Of course you
could break the child labor laws and hire 14 year olds who think they
know everything and still live at home.
PS. To Ferk,
A bit of friendly advice. Don't ever, _ever_ say "I can do it" without
knowing what "it" is. She may be looking for Ada, Pascal, QWBASIC, HPF,
Assembler, or even COBOL programmers. You'd be letting yourself in for
a huge headache in a lot of cases.
Steven
--
King of Casual Play
The One and Only Defender of Cards That Blow
My newsreader limits sigs to four lines, but I cleverly bypassed this by
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 15 Jun 2000 18:29:34 -0700
From: "Ferk Da Jerk" <shawnball@uswest.net>
Subject: Re: A Computer Programmers Profile
Message-Id: <God25.149$lY4.7651@news.uswest.net>
Russ Jones <russ_jones@rac.ray.com> wrote in message
news:39494B38.2D9C812C@rac.ray.com...
> Ferk Da Jerk wrote:
>
> > If your looking for a great worker I can do it and I need much money.
At
> > least $15 per hour.
> >
>
> Jeez you little wiener! Why don't you just pay THEM to work! I
> couldn't even keep myself in Maalox on $15 per hour!
>
> And you should see what my spell checker wanted to do with "Ferk."
Like I would let them only give me $15 an hour. I'm not stupid. I could
get more money stealing from my mom, but I don't do that. And I betch I
know what your spell checker said and what you thought. I won't use no
naughty langauge since you can't probably take it. It probably said ****.
Put that together with da jerk you get **** da jerk. Don't get any ideas
though, I'm a male and probably too young.
------------------------------
Date: Thu, 15 Jun 2000 18:31:28 -0700
From: "Ferk Da Jerk" <shawnball@uswest.net>
Subject: Re: A Computer Programmers Profile
Message-Id: <sqd25.150$lY4.7673@news.uswest.net>
Jerome O'Neil <jerome@activeindexing.com> wrote in message
news:vOc25.847$M85.41155@news.uswest.net...
> Russ Jones <russ_jones@rac.ray.com> elucidates:
>
> > And you should see what my spell checker wanted to do with "Ferk."
>
> Exerc some children and then kill them?
I'd like to see you try to kill the children. It seems these days the
children are out numbering the adults, the killers are the children, and the
children are more stronger than the adults.
------------------------------
Date: Thu, 15 Jun 2000 18:41:02 -0700
From: "Ferk Da Jerk" <shawnball@uswest.net>
Subject: Re: A Computer Programmers Profile
Message-Id: <qzd25.153$lY4.7768@news.uswest.net>
I'm sorry I was so rude.
------------------------------
Date: Thu, 15 Jun 2000 18:41:27 -0700
From: "Ferk Da Jerk" <shawnball@uswest.net>
Subject: Re: A Computer Programmers Profile
Message-Id: <Ozd25.154$lY4.7732@news.uswest.net>
I'm sorry that I said all of that stuff
------------------------------
Date: Thu, 15 Jun 2000 19:53:35 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: A Computer Programmers Profile
Message-Id: <slrn8kir3v.7qe.tadmc@magna.metronet.com>
On Thu, 15 Jun 2000 18:24:26 -0700, Ferk Da Jerk <shawnball@uswest.net> wrote:
>
>Drew Simonis <care227@attglobal.net> wrote in message
>news:3948E11C.42BA9477@attglobal.net...
>> Ferk Da Jerk wrote:
>> >
>> > If your looking for a great worker I can do it and I need much money.
>At
>> > least $15 per hour.
>>
>>
>> Boy I'd love to be 14 again.
>
>Yeah 14 is a great age. All you do is think how to rule the world, become
>rich, and about the opposite sex.
Hmmm. Sounds the same as 43 then.
>It's just great.
I agree.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: 15 Jun 2000 23:47:28 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Bot for this group to auto-answer queries?
Message-Id: <8ibpug$drb$1@news.NERO.NET>
In article <3949295D.CEEAEB67@jpl.nasa.gov>,
Jon Ericson <Jonathan.L.Ericson@jpl.nasa.gov> wrote:
>I think you might convince people of the usefulness of auto-responses if
>you start out very small. For instance, have the bot comment on poor
>subject lines. Tom Phoenix regularly posts:
There was once upon a time a news transport program that resulted in
emailed error reports to a poster when the news area on the destination
server filled up. "You message was not accepted...". Isn't it important
to notify someone that there is an error somewhere?
Programming a bot to harass people about the subject they've chosen is
not a good idea. Automated email in response to postings in a discussion
group are not a good idea.
>If this bot flys, start adding other automated advice. It could comment
>on jeopardy quoting of entire posts, the use of the word PERL, and
>reposts.
Yes, a perfect use of a bot is to complain about the use of the name of
a programming language in a newsgroup about that language. Oh, you are
being specific in your complaint about the correct use of an acronym
when you don't feel it should be referred to that way.
>People shouldn't have to spend a lot of time correcting the bot's
>mistakes.
There shouldn't be a bot in the first place. That's how you save a lot
of time correcting its mistakes.
------------------------------
Date: Thu, 15 Jun 2000 15:10:47 -0700
From: Aaron <alager@csuchico.edu>
Subject: bug with arrays?
Message-Id: <39495467.EE63FF88@csuchico.edu>
This one has got me stumped. The 10th index of an array is returning
'0' zero instead of the value in it. here is my code:
my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
if ( ($layout[$i] eq "dateadded") || ($layout[$i] eq "removedate") ) {
if($record[$i]) {
my $foo="";
my($m,$d,$y)=split(/-/, $record[$i]);
if ($m == 10) {
# print " $m, $d, $y: $month[$m] ";
$foo = "\'$d-oct-$y\'";
}else {
$foo = "\'$d-$month[$m]-$y\'";
}
$sql .= "$foo,";
}
When uncommented the line that prints the variables prints something
like: 10, 8, 1999: 0
whenever $m == 10. It works for every other month but 'oct'. Anyone
know what is going on?
Thanks for your help.
Aaron
------------------------------
Date: Thu, 15 Jun 2000 15:19:04 -0700
From: Samay <samay1NOsaSPAM@hotmail.com.invalid>
Subject: Re: bug with arrays?
Message-Id: <011a6d2f.c27f3b27@usw-ex0102-014.remarq.com>
We don't know what's in $record[$i], so cannot tell.. the
answer..
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: 15 Jun 2000 22:28:39 GMT
From: ansok@alumni.caltech.edu (Gary E. Ansok)
Subject: Re: bug with arrays?
Message-Id: <8iblan$a6@gap.cco.caltech.edu>
In article <39495467.EE63FF88@csuchico.edu>,
Aaron <alager@csuchico.edu> wrote:
>This one has got me stumped. The 10th index of an array is returning
>'0' zero instead of the value in it. here is my code:
>
>my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
You want to use something like
my @month = qw/ '' jan feb mar apr may jun jul aug sep oct nov dec /;
Perl is looking at each of those unquoted barewords and guessing what
you wanted to do with them. Mostly it guessed right, but for oct
it guessed wrong -- because "oct" is a Perl function, Perl called
that function and put the return value (zero) into the array.
Don't make Perl guess what you wanted -- either put quotes around each
string, or use something equivalent, like qw//. (See perldoc perlop
for more info on the qw operator.)
If you had used perl -w, it would have told you about this.
If you had used "use strict", it would have told you about this.
I highly recommend both -w and use strict.
-- Gary Ansok
------------------------------
Date: Thu, 15 Jun 2000 15:36:01 -0700
From: Aaron <alager@csuchico.edu>
Subject: Re: bug with arrays?
Message-Id: <39495A51.73F7FEEF@csuchico.edu>
When we get to this point in the code $record[$i] is a date: mm-dd-yyyy
$record[$i]="10-8-1999"; #doesn't work
$record[$i]="11-8-1999"; #will work
any time the first number is 10, it fails.
Aaron
Samay wrote:
> We don't know what's in $record[$i], so cannot tell.. the
> answer..
>
> * Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
> The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Thu, 15 Jun 2000 15:35:21 -0700
From: Samay <samay1NOsaSPAM@hotmail.com.invalid>
Subject: Re: bug with arrays?
Message-Id: <17935c40.9a2b49b1@usw-ex0104-031.remarq.com>
Sorry..
* Sent from RemarQ http://www.remarq.com The Internet's Discussion Network *
The fastest and easiest way to search and participate in Usenet - Free!
------------------------------
Date: Thu, 15 Jun 2000 22:38:21 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: bug with arrays?
Message-Id: <x7em5y7eoz.fsf@home.sysarch.com>
>>>>> "A" == Aaron <alager@csuchico.edu> writes:
A> This one has got me stumped. The 10th index of an array is returning
A> '0' zero instead of the value in it. here is my code:
using ESP::PSI i see that you are not using -w!
A> my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
if you had used -w, those barewords would have been warned about.
A> if ($m == 10) {
A> # print " $m, $d, $y: $month[$m] ";
hmmm, what is the value of $month[10]?
the bareword oct.
why does that look familiar?
because it is a perl function!! (unlike any other lowercased month
abbreviation).
so perl executes oct with no argument so it uses $_ and unless that
contains (or leads with) a legal octal string, it will return 0 which is
what you so correctly see.
so if you had capitalized your months this would not happen. in any case
you should quote the month names as bareword strings are not cool and
get warned. you will turn on -w in the future, correct?
and inserting a null string for 0 to make one based indexing works
smacks of bad design. but you have enough bugs to fix without learning
how to index from 0.
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: 15 Jun 2000 17:43:27 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: bug with arrays?
Message-Id: <871z1yefao.fsf@limey.hpcc.uh.edu>
>> On Thu, 15 Jun 2000 15:10:47 -0700,
>> Aaron <alager@csuchico.edu> said:
> my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
> It works for every other month but 'oct'. Anyone know
> what is going on? Thanks for your help.
Make sure you invoke perl with -w and "use strict" in the
code. That will pick up a few important things. It won't
complain about oct but that is because there's a perl
function called oct, which is the root of your problem.
hth
t
--
"Trying is the first step towards failure"
Homer Simpson
------------------------------
Date: Thu, 15 Jun 2000 15:42:34 -0700
From: "Lauren Smith" <lauren_smith13@hotmail.com>
Subject: Re: bug with arrays?
Message-Id: <8ibm3i$bsc$1@brokaw.wa.com>
Aaron <alager@csuchico.edu> wrote in message
news:39495467.EE63FF88@csuchico.edu...
> This one has got me stumped. The 10th index of an array is returning
> '0' zero instead of the value in it. here is my code:
I'm surprised it even runs. Did you cut and paste this code or did you type
it in by hand? Please cut and paste.
>
> my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
This line is not terminated (well, not until the next line 'eq "dateadded'.
Change the line to:
my @month = qw (jan feb mar apr may jun jul aug sep oct now dec);
> if ( ($layout[$i] eq "dateadded") || ($layout[$i] eq "removedate") ) {
> if($record[$i]) {
> my $foo="";
> my($m,$d,$y)=split(/-/, $record[$i]);
> if ($m == 10) {
You have an off-by-one error here. Oct has an index of 9, not 10.
> # print " $m, $d, $y: $month[$m] ";
> $foo = "\'$d-oct-$y\'";
> }else {
> $foo = "\'$d-$month[$m]-$y\'";
> }
> $sql .= "$foo,";
> }
>
> When uncommented the line that prints the variables prints something
> like: 10, 8, 1999: 0
Likely, there isn't anything in the array except for the string
"jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);\n\tif ( ($layout[$i] eq "
> whenever $m == 10. It works for every other month but 'oct'. Anyone
> know what is going on?
No, but it's because I don't believe that the code works for *any* month.
Lauren
------------------------------
Date: 15 Jun 2000 23:48:18 GMT
From: petolino@Eng.Sun.COM (Joe Petolino)
Subject: Re: bug with arrays?
Message-Id: <8ibq02$544$1@engnews3.Eng.Sun.COM>
>Aaron <alager@csuchico.edu> wrote i
>> This one has got me stumped. The 10th index of an array is returning
>> '0' zero instead of the value in it. here is my code:
>>
>> my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
Lauren Smith <lauren_smith13@hotmail.com> wrote:
>This line is not terminated (well, not until the next line 'eq "dateadded'.
I think Lauren may be reading newsgroups with one of those accursed
proportional fonts. Just inside the open-parens there are two
singlequote characters, not one doublequote character. The line does
not contain an unterminated string literal.
However, it does contain a bunch of barewords, i.e. unquoted words which
were intended to be interpreted as literal strings. This works (usually)
but is deprecated, for reasons which are well illustrated here. The
source of the bug is this particular bareword
oct
which, unfortunately, is the name of the Perl octal string conversion
function. It parses as
oct()
not as
'oct'
oct() without an argument defaults to oct($_), which apparently
evaluates to 0 in Aaron's script.
If the script had been run with -w, perl would have complained about
11 of the 12 barewords on that line, but not about the one causing
the problem.
I second Lauren's suggestion to use qw, but I'd keep the original
feature of padding with a null first element to make the indexes
work out nicer. Maybe something like this:
my @month = qw(jan feb mar apr may jun jul aug sep oct nov dec);
unshift @month, ''; # So that $month[1] == 'jan', etc.
-Joe
--
Joe Petolino petolino@eng.sun.com
------------------------------
Date: Thu, 15 Jun 2000 17:10:02 -0700
From: "Lauren Smith" <lauren_smith13@hotmail.com>
Subject: Re: bug with arrays?
Message-Id: <8ibr7h$b9g$1@brokaw.wa.com>
Joe Petolino <petolino@Eng.Sun.COM> wrote in message
news:8ibq02$544$1@engnews3.Eng.Sun.COM...
> >Aaron <alager@csuchico.edu> wrote i
> >> This one has got me stumped. The 10th index of an array is returning
> >> '0' zero instead of the value in it. here is my code:
> >>
> >> my @month=('',jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec);
>
> Lauren Smith <lauren_smith13@hotmail.com> wrote:
> >This line is not terminated (well, not until the next line 'eq
"dateadded'.
>
> I think Lauren may be reading newsgroups with one of those accursed
> proportional fonts. Just inside the open-parens there are two
> singlequote characters, not one doublequote character. The line does
> not contain an unterminated string literal.
*Copy* *open up Notepad* *Paste*
Yes, you're right... *grumble*
*accurse* *recurse*
Lauren
------------------------------
Date: 15 Jun 2000 19:50:04 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: bug with arrays?
Message-Id: <87r99ycuv7.fsf@limey.hpcc.uh.edu>
>> On 15 Jun 2000 23:48:18 GMT,
>> petolino@Eng.Sun.COM (Joe Petolino) said:
> I second Lauren's suggestion to use qw, but I'd keep the
> original feature of padding with a null first element to
> make the indexes work out nicer. Maybe something like
> this:
Fiddling about with data structures and adding meaningless
fields isn't, IMHO, a good idea. Data which represent a
real-world "thing" should echo the real-world exactly if
at all possible. It's up to the code to make the
translation. I find this to be an especially valuable
tack to take when the real-world data come from something
not under your control, e.g. down a pipe or from a config
file. I'd possibly make an exception for severe
space-time tradeoffs but I don't have any experience of
such a tradeoff being necessary.
You can tell perl to use 1 as the base array index
(perldoc perlvar) or use a "shift by 1" computation when
you generate the subscript.
my 2p;
hth
t
--
"Trying is the first step towards failure"
Homer Simpson
------------------------------
Date: Thu, 15 Jun 2000 17:52:23 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Can Perl use SSL or HTTPS protocol?
Message-Id: <Pine.GSO.4.10.10006151751040.5301-100000@user2.teleport.com>
On Thu, 15 Jun 2000 robb4444@my-deja.com wrote:
> Thanks for the advice. By the way, do you have any good
> tutorials/books for RFC's and checking system calls?
The RFCs are here:
http://dir.yahoo.com/Computers_and_Internet/Standards/RFCs/
For most system calls in Perl, it's analogous to checking the return value
from open:
open FILE, "/foo/bar/fizzle"
or die "Can't open '/foo/bar/fizzle': $!";
Good luck with it!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: 15 Jun 2000 18:34:20 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: can't get CGI.pm to autoEscape ?
Message-Id: <87vgzacydf.fsf@limey.hpcc.uh.edu>
OK, I'm probably about to make a fool of myself but here goes:
I'm using perl5.6 and CGI.pm version 2.68
I wanted to use URI to generate a URL with a query string
in it and then use that as an href through the a()
shortcut of CGI. Here's an example:
use CGI qw(:standard);
my $ae = autoEscape(undef);
use URI;
my $url = new URI 'http://www.somewhere.com/path/script.cgi';
$url->query_form( a => 1, b => 2 );
print a({href => $url}, 'click me!'), "\n";
I can't get CGI not to munge the HTML, which means the
link comes out with the query string as:
?a=1&b=2
"perldoc CGI" (and a comment in the source) uses
autoEscape(undef) and I tried 0 too but I can't change it
(other experiments always show it returning `1').
HTML::AsSubs does this too.
Any ideas? Is my brain farting or is something wrong?
tony
--
"Trying is the first step towards failure"
Homer Simpson
------------------------------
Date: Thu, 15 Jun 2000 17:49:21 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: CGI textarea conversion code
Message-Id: <Pine.GSO.4.10.10006151748200.5301-100000@user2.teleport.com>
On Thu, 15 Jun 2000, Helza wrote:
> read(STDIN,$my_input,$ENV{'CONTENT_LENGTH'});
> @fv_pairs = split(/&/,$my_input);
It's better to use a module (like CGI.pm) to do this...
> foreach $pair (@fv_pairs) {
> if($pair=~m/([^=]+)=(.*)/) {
> $field = $1;
> $value = $2;
> $value =~ s/\+/ /g;
> $value =~ s/%([\dA-Fa-f]{2})/pack("C", hex($1))/eg;
> $INPUT{$field}=$value;
Besides being easier, it also does the job correctly. Cheers!
--
Tom Phoenix Perl Training and Hacking Esperanto
Randal Schwartz Case: http://www.rahul.net/jeffrey/ovs/
------------------------------
Date: Thu, 15 Jun 2000 23:46:23 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: CGI.pm newbie question
Message-Id: <Pine.GHP.4.21.0006152336300.3542-100000@hpplus03.cern.ch>
On Thu, 15 Jun 2000, Makarand Kulkarni wrote:
> It is better to do form input validation on the browser/client
> side itself using Javascript and allow the form to be submitted
> iff the form input is meaningful and ready to be sent to the
> server side cgi script.
Oh no! It can be useful to optionally do form input validation on the
client side, as an _additional_ convenience to those who are willing
to enable javascript.
But it is never optional to validate the data on the server side, if
anything remotely meaningful is going to be done with that data.
If you're in that business, the WWW security FAQ might be the most
important FAQ you ever read.
http://www.w3.org/Security/faq/www-security-faq.html
cheers
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 V9 Issue 3381
**************************************
