[12281] in Perl-Users-Digest
Perl-Users Digest, Issue: 5881 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 3 22:07:23 1999
Date: Thu, 3 Jun 99 19:00:18 -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 Thu, 3 Jun 1999 Volume: 8 Number: 5881
Today's topics:
\n doesn't work on NT4 SP4 <amonotod@netscape.net>
Re: \n doesn't work on NT4 SP4 RABM@prodigy.net
Can't make a perl NT <mikeyway@otw.com>
Re: funky STDOUT under Win32? (Eric Bohlman)
Help with OOP in Perl <steadmrd@cafes.net>
Re: Help with OOP in Perl <jeromeo@atrieva.com>
Re: Help! Perl "typo" error (Tad McClellan)
Re: How do you print a file backwards by line? (Fuzzy Warm Moogles)
Indenting closing labels for here documents <jb4mt@hotmail.com>
need simple database access script jamiemw@my-deja.com
Re: need simple database access script <tchrist@mox.perl.com>
Re: Premature end of script headers? <hasant@trabas.co.id>
Problem copying file <shadowsystems@ibm.net>
Re: Problem copying file (William Burrow)
Re: Problem copying file <art@stacken.kth.se>
Question about regexp's <jamesio@mediaone.net>
Re: Question about regexp's RABM@prodigy.net
Re: require and the include stack under the covers... <jdporter@min.net>
Setting $- to 0 causes core dump <chetal@savera.com>
simple newbie problem <drifter888@hotmail.com>
Re: simple newbie problem (Larry Rosler)
Re: where did I go wrong? (Larry Rosler)
Re: where did I go wrong? <jdporter@min.net>
Re: where did I go wrong? <jdporter@min.net>
Re: Writing a Form Validation Script <hasant@trabas.co.id>
Re: You can earn $50,000 by learning programming skills <dawndan@gateway.net>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 03 Jun 1999 22:14:05 GMT
From: Amonotod <amonotod@netscape.net>
Subject: \n doesn't work on NT4 SP4
Message-Id: <7j6un4$rqq$1@nnrp1.deja.com>
Hello all, and thank you for your time.
Running NT4 Sp4 Hotfixes and Y2K Update on a Micron PII-450 as a PDC.
Have ActiveState Perl for Win32 installed (Downloaded about 3 weeks
ago.). Putting together a script for Profiles/User Directories/Exhange
Accounts, and can't get the newline character "\n" to work. Just for
more info, I am not using any outside modules (Mostly because I am too
simple at programming to use modules.), just running straight Perl.
Never had a problem with this on Solaris, but can't seem to make it work
on NT. Here's an example:
print "Please confirm the info you have entered. \n";
print "Username is $username, first name is $first_name, \n";
print "last name is $last_name, and title is $title. \n";
print "Is this infomation correct?"
$status = 0;
while ($status < 1){
$ansr = <stdin>;
chop $ansr;
lc $ansr;
if ($ansr ne ( 'y' || "n'){
redo;
... and so on...
Anyway, none of the newlines are shown. Script just puts all text on
one line, and wraps around the screen. I even tried \r, \p and
combinations of the three, all to no avail. I have searched the
newsgroups and all the Web FAQ's and cant find this one, so I am posting
it now. Any help is appreciated, feel free to reply to the newsgoups or
my email, as listed below.
Thank you all,
William
--
`\|||/ amonotod@
(@@) netscape.net
ooO_(_)_Ooo________________________________
_____|_____|_____|_____|_____|_____|_____|_____|
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 03 Jun 1999 21:32:11 -0400
From: RABM@prodigy.net
Subject: Re: \n doesn't work on NT4 SP4
Message-Id: <uvhd4oin8.fsf@prodigy.net>
>>>>> "Amonotod" == Amonotod <amonotod@netscape.net> writes:
Amonotod> Hello all, and thank you for your time.
Amonotod> Running NT4 Sp4 Hotfixes and Y2K Update on a Micron PII-450 as a PDC.
Amonotod> Have ActiveState Perl for Win32 installed (Downloaded about 3 weeks
Amonotod> ago.). Putting together a script for Profiles/User Directories/Exhange
Amonotod> Accounts, and can't get the newline character "\n" to work. Just for
Amonotod> more info, I am not using any outside modules (Mostly because I am too
Amonotod> simple at programming to use modules.), just running straight Perl.
Amonotod> Never had a problem with this on Solaris, but can't seem to make it work
Amonotod> on NT. Here's an example:
It doesn't seem to work on my NT either. I'm running SP3. Must be
something with the OS.... Oh, wait a minute maybe it is the script!!!
Amonotod> print "Please confirm the info you have entered. \n";
Amonotod> print "Username is $username, first name is $first_name, \n";
Amonotod> print "last name is $last_name, and title is $title. \n";
Amonotod> print "Is this infomation correct?"
Amonotod> $status = 0;
Amonotod> while ($status < 1){
Amonotod> $ansr = <stdin>;
Amonotod> chop $ansr;
Amonotod> lc $ansr;
Amonotod> if ($ansr ne ( 'y' || "n'){
Amonotod> redo;
Amonotod> ... and so on...
This code snippet wouldn't work on any machine.
First <stdin> must be <STDIN>. page 14 camel book
Second lc is a function. That is it returns something. You can't do that!
Well ok you can do, and you did, but on my machine it said "Useless use of
lower case in void context at e:\bin/conf.bat line 69 (#1)"
It only gets worse after that...
-- Vinny
------------------------------
Date: Thu, 03 Jun 1999 22:52:52 GMT
From: "Mike S." <mikeyway@otw.com>
Subject: Can't make a perl NT
Message-Id: <3756cde5.0@news.otw.com>
If anyone can help me get a perl loaded on NT Server 4 I would appreciate
it.
So Far:
-Downloaded and unzipped the files for perl 5
-Downloaded and unzipped dmake
error: "Warning can't create dmake-4_1pl1-win32.patch
-dmake perl
error "don't know how to make 'perl'
Obviously perl -v is unknown. I'm sure that somehow I've missed something
important but I don't know what. Is there explicit documentation somewhere
on installing a perl on NT Server? The two books I have don't go into any
detail on the perl install.
Regards,
Mike
------------------------------
Date: Thu, 3 Jun 1999 23:14:06 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: funky STDOUT under Win32?
Message-Id: <ebohlmanFCrxvI.1J2@netcom.com>
orock@my-deja.com wrote:
: here is the problem.
: > junk.pl > junk.log
: > type junk.log
: >
: log file has been created but is empty
: then I discovered the following.
: > perl.exe junk.pl > junk.log
: > type junk.log
: Tue Jun 1 16:32:04 1999
: Tue Jun 1 16:32:05 1999
: Tue Jun 1 16:32:06 1999
: >
: it works fine if I run it through perl explicitly.
: Has anyone seen something like this before? Is this an NT
: OS problem or a perl.exe problem? It seems to me that
: perl.exe is not passing STDOUT on properly when run
: implicitly with a .pl script.
It's an NT problem. If you invoke a command via file associations, you
can't redirect its output. You might try using pl2bat to create batch
files from your scripts instead.
------------------------------
Date: Thu, 3 Jun 1999 10:20:00 -0500
From: "Josh Steadmon" <steadmrd@cafes.net>
Subject: Help with OOP in Perl
Message-Id: <375708a1.0@news.isdn.net>
Hello, I'm an intermediate Perl programmer who has been plagued by poorly
written tutuorials. I was hoping someone could point me to a (hopefully
free) guide on object oriented stuff in Perl. Thanks for the help!
Josh
------------------------------
Date: Thu, 03 Jun 1999 16:30:12 -0700
From: Jerome O'Neil <jeromeo@atrieva.com>
To: Josh Steadmon <steadmrd@cafes.net>
Subject: Re: Help with OOP in Perl
Message-Id: <37571004.6C4B054@atrieva.com>
perldoc perltoot and perldoc perlobj willl get you safely on your way!
Good Luck!
Josh Steadmon wrote:
>
> Hello, I'm an intermediate Perl programmer who has been plagued by poorly
> written tutuorials. I was hoping someone could point me to a (hopefully
> free) guide on object oriented stuff in Perl. Thanks for the help!
>
> Josh
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: Thu, 3 Jun 1999 10:07:23 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Help! Perl "typo" error
Message-Id: <r626j7.vai.ln@magna.metronet.com>
micheal (shamu_78@hotmail.com) wrote:
: It looks like you have a var that is not being used I have seen this before
: are you using the -w option with perl if so take it off and there should be
: no output.
That is an absurd solution.
When a car's engine makes a funny noise, it can be easily
fixed by turning up the radio volume.
Masking the problem does not solve the problem. It merely
hides the problem, the problem is still there...
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Fri, 04 Jun 1999 00:32:47 GMT
From: tgy@chocobo.org (Fuzzy Warm Moogles)
Subject: Re: How do you print a file backwards by line?
Message-Id: <37571e04.354494234@news.oz.net>
On Wed, 02 Jun 1999 13:46:58 GMT, John Porter <jdporter@min.net> wrote:
>Or even better (;-) --
>
> sub tac {
> local $_;
> while(<>){
> (\&{(caller 0)[3]})->();
> print;
last;
> }
> }
>
> tac();
--
Fuzzy | tgy@chocobo.org | Will hack Perl for a moogle stuffy! =^.^=
------------------------------
Date: Fri, 04 Jun 1999 00:50:35 GMT
From: "George Jempty" <jb4mt@hotmail.com>
Subject: Indenting closing labels for here documents
Message-Id: <vpF53.145$4p2.112@news.rdc1.ne.home.com>
Some one told me that the latest issue of the Perl Journal included info on
a work around for indenting closing labels for here documents. Well I
subscribed to the online version and used the search utility and could not
find the information. Can anyone either tell me exactly where it is and in
which issue of the Perl Journal, or tell me what the solution is.
Thanks
George Jempty
------------------------------
Date: Thu, 03 Jun 1999 20:39:18 GMT
From: jamiemw@my-deja.com
Subject: need simple database access script
Message-Id: <7j6p5l$pji$1@nnrp1.deja.com>
I am looking for a simple perl cgi script that
will allow users to enter a username and password
that will query a database (excel or flat file)
and return some simple inquires about their
account. Does anyone know where I can find one?
Thanks,
Jamie
jwallace@fcfc.removethis.com
to email me take out the .removethis
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: 3 Jun 1999 16:17:00 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: need simple database access script
Message-Id: <3756fedc@cs.colorado.edu>
[courtesy cc of this posting mailed to cited author]
In comp.lang.perl.misc, jamiemw@my-deja.com writes:
:I am looking for a simple perl cgi script that
:will allow users to enter a username and password
:that will query a database (excel or flat file)
:and return some simple inquires about their
:account. Does anyone know where I can find one?
Why yes. Go to http://language.perl.com/admin/whats_new.html
and scan down for CPAN query engines. You might look at
the mox personal stuff for the same approach.
:jwallace@fcfc.removethis.com
:to email me take out the .removethis
I refuse. Stop accomodating the spammers. Fight them.
--tom
--
Real programmers can write assembly code in any language. :-)
--Larry Wall in <8571@jpl-devvax.JPL.NASA.GOV>
------------------------------
Date: Fri, 4 Jun 1999 04:21:40 +0700 (JAVT)
From: Hasanuddin Tamir <hasant@trabas.co.id>
To: comp.lang.perl.misc@list.deja.com
Subject: Re: Premature end of script headers?
Message-Id: <Pine.LNX.3.96.990604042048.1817A-100000@borg.intern.trabas.co.id>
On Thu, 27 May 1999, Scott Kramer wrote:
deeto] Date: Thu, 27 May 1999 13:57:39 -0400
deeto] From: Scott Kramer <deeto@yahoo.com>
deeto] To: comp.lang.perl.misc@list.deja.com
deeto] Subject: Premature end of script headers?
deeto] Reply-To: comp.lang.perl.misc@list.deja.com
deeto] Organization: IDT (Best News In The World)
deeto]
deeto] What causes this error message (it's in the error log file) when I run
deeto] my CGI script?
What error?
-hasan-
uhm, no more sig(h)
------------------------------
Date: Thu, 03 Jun 1999 18:51:56 -0400
From: Scott Wells <shadowsystems@ibm.net>
Subject: Problem copying file
Message-Id: <3757070C.A8408510@ibm.net>
I wrote a perl script on an OpenBSD machine to update a DNS zone file.
Update goes fine, but no matter what I do, when it's called by Apache it
won't copy back to the /var/named directory. The script has suid
permissions set, and is owned by named. /var/named is owned by named,
as well as is the file I'm tryng to put there. The command I'm trying
is:
system("cp /tmp/zone.file /var/named/my.zone");
Whenever I run this script from the shell prompt, it works fine (as root
or named). I am using Apache 1.3.6.
Please cc: to my e-mail (shadowsystems@ibm.net).
Thanks,
Scott
------------------------------
Date: 4 Jun 1999 00:15:46 GMT
From: aa126@DELETE.fan.nb.ca (William Burrow)
Subject: Re: Problem copying file
Message-Id: <slrn7le6kj.99s.aa126@fan1.fan.nb.ca>
On Thu, 03 Jun 1999 18:51:56 -0400,
Scott Wells <shadowsystems@ibm.net> wrote:
>I wrote a perl script on an OpenBSD machine to update a DNS zone file.
>Update goes fine, but no matter what I do, when it's called by Apache it
>won't copy back to the /var/named directory. The script has suid
>permissions set, and is owned by named.
Wow, OpenBSD permits suid scripts....
>/var/named is owned by named,
>as well as is the file I'm tryng to put there. The command I'm trying
>is:
>
>system("cp /tmp/zone.file /var/named/my.zone");
>
>Whenever I run this script from the shell prompt, it works fine (as root
>or named). I am using Apache 1.3.6.
Did you check your error_log to see what error the webserver was giving?
Could you tell us? Also post in the comp.infosystems...cgi newsgroup.
--
William Burrow -- New Brunswick, Canada o
Copyright 1999 William Burrow ~ /\
~ ()>()
------------------------------
Date: 04 Jun 1999 02:46:33 +0200
From: Artur Grabowski <art@stacken.kth.se>
Subject: Re: Problem copying file
Message-Id: <lubogiwkd1y.fsf@pizza.stacken.kth.se>
aa126@DELETE.fan.nb.ca (William Burrow) writes:
> On Thu, 03 Jun 1999 18:51:56 -0400,
> Scott Wells <shadowsystems@ibm.net> wrote:
> >I wrote a perl script on an OpenBSD machine to update a DNS zone file.
> >Update goes fine, but no matter what I do, when it's called by Apache it
> >won't copy back to the /var/named directory. The script has suid
> >permissions set, and is owned by named.
>
> Wow, OpenBSD permits suid scripts....
No, we don't.
//art
------------------------------
Date: Thu, 3 Jun 1999 21:15:30 -0400
From: "James Faircloth" <jamesio@mediaone.net>
Subject: Question about regexp's
Message-Id: <37572796@news3.newsfeeds.com>
Given the following program:
$found = 0;
$i = "test?test";
$search = "?";
if ($i =~ /$search/i) {
$found = 1;
}
print "$found\n";
I get the following error:
# /?/: ?+*{} follows nothing in regexp at argh.pl line 5.
Anyone have a good idea on how to search the string for items that may be
regexp keywords?
I may need to search the string for a "*" also... and I can't find anything
to help me in determining what to do.
If you do reply, could you email me a copy? I may miss it otherwise.
James Faircloth
james@yahoo.com
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: 03 Jun 1999 21:46:37 -0400
From: RABM@prodigy.net
Subject: Re: Question about regexp's
Message-Id: <uso88ohz6.fsf@prodigy.net>
>>>>> "James" == James Faircloth <jamesio@mediaone.net> writes:
James> Given the following program:
James> $found = 0;
James> $i = "test?test";
James> $search = "?";
James> if ($i =~ /$search/i) {
James> $found = 1;
James> }
put:
if ( $i =~ /\Q$search/i ) {
$found = 1;
}
print "found $search\n" if $found;
the \Q is quote (disable) pattern metacharacters till \E. See perldoc
perlre for more details.
--
------------------------------
Date: Thu, 03 Jun 1999 23:41:29 GMT
From: John Porter <jdporter@min.net>
Subject: Re: require and the include stack under the covers...
Message-Id: <7j73r8$tk0$1@nnrp1.deja.com>
In article <3756A306.C6451630@buffalo.edu>,
Andrew S Gianni <agianni@acsu.buffalo.edu> wrote:
> ... I'm not sure if these is caching involved
> with the include stack. i.e. after you do a require once on something
> that's in the include stack is something cached so it's easier to find
> it a second time? If this is the case, it would invalidate the test.
Dude, have you not read ANY documentation of the require function?
OF COURSE it caches. perldoc -f require.
> If anyone knows more about the internals of how all this is done under
> the covers, I'd appreciate some commentary.
See the %INC variable too. (perldoc perlvar)
--
John Porter
Put it on a plate, son. You'll enjoy it more.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 03 Jun 1999 23:13:49 GMT
From: Pradeep Chetal <chetal@savera.com>
Subject: Setting $- to 0 causes core dump
Message-Id: <37570C23.9606FA92@savera.com>
I am running a perl script under 5.005_02 on Solaris platform.
I have a REPORT_TOP format and a REPORT format. Under certain conditions I have
to set $- = 0 to force a from-feed. So I do something like
select((select(OUTF), $- = 0)[0])
to set $- to 0 under OUTF file handle which is my report output.
perl causes code dump. Is this a known problem?
/Pradeep
------------------------------
Date: Thu, 3 Jun 1999 21:04:13 -0700
From: "Drifter" <drifter888@hotmail.com>
Subject: simple newbie problem
Message-Id: <lyF53.164$Qc.1144@newsfeed.slurp.net>
I've been looking at many tutorials on regular expressions and i can't seem
to figure out how to change only the first letter of a variable from
lowercase to uppercase.
can anyone help me out? im sure it will only take you a minute
--
Drifter
~
The softest stuff in the world
Penetrates quickly the hardest;
Insubstantial, it enters
Where no room is.
TAO TE CHING
------------------------------
Date: Thu, 3 Jun 1999 18:22:08 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: simple newbie problem
Message-Id: <MPG.11c0ca1af7057e8a989b67@nntp.hpl.hp.com>
[Posted and a courtesy copy sent.]
In article <lyF53.164$Qc.1144@newsfeed.slurp.net> on Thu, 3 Jun 1999
21:04:13 -0700, Drifter <drifter888@hotmail.com> says...
>
> I've been looking at many tutorials on regular expressions and i can't seem
> to figure out how to change only the first letter of a variable from
> lowercase to uppercase.
s/([a-z])/\u$1/;
This converts the first lower-case ASCII letter in the string to upper-
case. As shown, it doesn't have to be the first character in the
string. You should be able to make suitable modifications for your
needs.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 3 Jun 1999 15:24:05 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: where did I go wrong?
Message-Id: <MPG.11c0a05c33587ac3989b66@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <_9C53.2668$5a.4281@news20.bellglobal.com> on Thu, 03 Jun
1999 21:09:14 GMT, Marc Bissonnette <dragnet@internalysis.com> says...
...
> I need to be able to display the data alphabetically, sorted on fname, lname or
> cname. Problem is when the script encounters a duplicate sort field, it (again,
> obviously) keeps the last value.
>
> I *know* I've seen how to get around that in a doc or manual, but can't find it
> for the life of me. Can someone point me in the right direction?
Forget the hash (at least for this purpose). Read all the lines into an
array, perhaps chomping. Then read perlfaq4: "How do I sort an array
by (anything)?".
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Thu, 03 Jun 1999 23:25:54 GMT
From: John Porter <jdporter@min.net>
Subject: Re: where did I go wrong?
Message-Id: <7j72tp$tb1$1@nnrp1.deja.com>
In article <MPG.11c07476dc711339989b64@nntp.hpl.hp.com>,
lr@hpl.hp.com (Larry Rosler) wrote:
> my (%data, @names);
> while (<DATA>) {
> my @line = split /\|/;
> push @names, $line[0];
> $data{$line[0]} = {
> fname => $line[0],
> lname => $line[1],
> title => $line[2],
> comp => $line[3],
> };
> }
#!/usr/local/bin/perl -w
use Tie_IxHash;
use strict;
my @field_names = qw( fname lname title comp );
my %data;
tie %data, 'Tie::IxHash';
while (<DATA>) {
my %h;
@h{@field_names} = split /\|/;
$data{ $h{'fname'} } = \%h;
}
foreach ( values %data ) {
print $_->{'fname'};
}
--
John Porter
Put it on a plate, son. You'll enjoy it more.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 03 Jun 1999 23:36:57 GMT
From: John Porter <jdporter@min.net>
Subject: Re: where did I go wrong?
Message-Id: <7j73ip$tgt$1@nnrp1.deja.com>
In article <7j72tp$tb1$1@nnrp1.deja.com>,
John Porter <jdporter@min.net> wrote:
> use Tie_IxHash;
Woops, I meant Tie::IxHash, of course.
--
John Porter
Put it on a plate, son. You'll enjoy it more.
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Fri, 4 Jun 1999 04:15:45 +0700 (JAVT)
From: Hasanuddin Tamir <hasant@trabas.co.id>
To: comp.lang.perl.misc@list.deja.com
Subject: Re: Writing a Form Validation Script
Message-Id: <Pine.LNX.3.96.990604041337.1758A-100000@borg.intern.trabas.co.id>
On Thu, 27 May 1999, Bill Jones wrote:
bill] Date: Thu, 27 May 1999 11:43:43 -0400
bill] From: Bill Jones <bill@fccj.org>
bill] To: comp.lang.perl.misc@list.deja.com
bill] Subject: Re: Writing a Form Validation Script
bill] Reply-To: comp.lang.perl.misc@list.deja.com
bill] Organization: FCCJ DSS
bill]
bill] In article <7ijnjd$pic$1@nnrp1.deja.com>, simchadov@my-deja.com wrote:
bill]
bill]
bill] >
bill] >
bill] > Hi,
bill] >
bill] > I need to write a script that does generic CGI form validation. Are
bill] > there modules written to support this sort of thing or has anyone seen
bill] > scripts out there that do this already?
bill] >
bill] > Thanks, Scott
bill] >
bill] > PS- If you could email me a reply to scott@newfangled.com that would be
bill] > great.
bill]
bill]
bill] Save yourself some heartache!
bill]
bill] Get the Perl Cookbook and the Offical Guide to
bill] Programming with CGI.pm
bill]
bill] PS - Post here, Read here...
Or....,
I saw a module called CGI::Validate on CPAN.
Haven't tested it myself.
-hasan-
-------
uhm, no more sig(h)
------------------------------
Date: Thu, 3 Jun 1999 18:16:05 -0600
From: "Dan Hinojosa" <dawndan@gateway.net>
Subject: Re: You can earn $50,000 by learning programming skills and applying yourself
Message-Id: <7j75tb$2o2$1@news.laserlink.net>
MONEY <money@moneymaker.com> wrote in message
news:31059903.3824@moneymaker.com...
>
> THE PROGRAM
> $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
>
> INCREDIBLE $0 to $50,000 in 90 days!!!
>
> Dear Friend,
>
> You can earn $50,000 or more in next the 90 days sending e-mail. Seem
> impossible? Read on for details.
>
This is no joke! I was pennyless in 1990, and then I learned C++ and Java,
and all of a sudden it all came together. All of a sudden, I had respect
for myself, and I was making $50,000 and more. The best part about it, is
that I didn't have to lower my dignity and annoy people with high IQs that
wouldn't fall this swindle anyway!
Love,
Digital Priest
------------------------------
Date: 12 Dec 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 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5881
**************************************