Re: form display problem

2002-06-11 Thread ahammell
Janek Schleicher wrote: > > Alaric Joseph Hammell wrote at Tue, 11 Jun 2002 18:06:46 +0200: > > > So, I have these two subroutines, match_state() and display_form that I am having >problems with. > > If the script is run with $state getting the function > > > > argument, it prints a blank pul

Re: Example for "uniq"

2002-06-11 Thread Jonathan Gines
good catch. my mistake. i wrote this snippet before going to a quick meeting. At 11:31 PM 6/11/02 +0200, Janek Schleicher wrote: >Jonathan Gines wrote at Tue, 11 Jun 2002 17:29:38 +0200: > > > ... > > # read data > > # > > $foo{$data]++; #count data. new values = 1, previously read values >

Re: Example for "uniq"

2002-06-11 Thread Janek Schleicher
Jonathan Gines wrote at Tue, 11 Jun 2002 17:29:38 +0200: > ... > # read data > # > $foo{$data]++; #count data. new values = 1, previously read values are >incremented by 1 ^ } :-)) Cheerio, Janek -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands

Re: form display problem

2002-06-11 Thread Janek Schleicher
Alaric Joseph Hammell wrote at Tue, 11 Jun 2002 18:06:46 +0200: > So, I have these two subroutines, match_state() and display_form that I am having >problems with. > If the script is run with $state getting the function > > argument, it prints a blank pulll-down menu and is able to print "Quad

form display problem

2002-06-11 Thread Alaric Joseph Hammell
So, I have these two subroutines, match_state() and display_form that I am having problems with. If the script is run with $state getting the function argument, it prints a blank pulll-down menu and is able to print "Quadrants covering West Virginia" . But, when $state is explicity set to "Wes

Re: Example for "uniq"

2002-06-11 Thread Jonathan Gines
when you're reading the data, create a hash such that each value is incremented when more than one instance is read. what happens is that key value pairs are "values and counts' of each value. my %foo = (); # read data # $foo{$data]++; #count data. new values = 1, previously read values a

Re: CGI Poll Sample?

2002-06-11 Thread Dennis G. Wicks
Greetings; For many good cgi examples go to http://nms-cgi.sourceforge.net/ Good Luck! Dennis On Tue, 11 Jun 2002, Naika - EV1 wrote: > Greetings, > > Does anyone have a web based poll script that I can play with? I'm trying to > write my own but am having a very hard time getting it

CGI Poll Sample?

2002-06-11 Thread Naika - EV1
Greetings, Does anyone have a web based poll script that I can play with? I'm trying to write my own but am having a very hard time getting it to work. I need one that just writes the results to a text file. Thanks - Naika http://naikaonline.com -- To unsubscribe, e-mail: [EMAIL PROTECTE

Re: Using strict and a configuration file?

2002-06-11 Thread David T-G
Teddy -- ...and then Octavian Rasnita said... % % Hi all, Hello! % % Is it possible to use "use strict;" if I get the variables from a % configuration file? % % I've tried: % % use strict; % require "f:/xxx/config.txt"; Have you tried use "f:/xxx/config.txt"; instead? From my reading

Re: [OT] RE: POD vs. # Comments

2002-06-11 Thread David T-G
John, et al -- ...and then John Brooking said... % ... % Hey! The Camel book (am I right in assuming that is % the Perl community's nickname for O'Reilly's It sure is, but ... % "Programming Perl"?) says that "comment", when used as % a translator keyword following "=for", is by Whoa! You f

Error durinng install

2002-06-11 Thread Lance Prais
I am trying to install CGI.pm-3.01 on my Solaris 2.6 ultra 5 box. Below is the install process. I am not familiar with the error ""[test_dynamic] Error 29" It dose not appear to be fatal because if I force the install everything appears to be working correctly. In everything I have read rega

RE: Using strict and configuration files

2002-06-11 Thread Bob Showalter
> -Original Message- > From: Camilo Gonzalez [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, June 11, 2002 10:21 AM > To: 'Bob Showalter'; Camilo Gonzalez; [EMAIL PROTECTED] > Subject: RE: Using strict and configuration files > > > So the following are equivalent: > > use vars qw(foo) > >

RE: Using strict and configuration files

2002-06-11 Thread Camilo Gonzalez
So the following are equivalent: use vars qw(foo) our $foo = "" -Original Message- From: Bob Showalter [mailto:[EMAIL PROTECTED]] Sent: Tuesday, June 11, 2002 9:17 AM To: 'Camilo Gonzalez'; [EMAIL PROTECTED] Subject: RE: Using strict and configuration files > -Original Message

RE: Using strict and configuration files

2002-06-11 Thread Bob Showalter
> -Original Message- > From: Camilo Gonzalez [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, June 11, 2002 10:16 AM > To: 'Bob Showalter'; 'Octavian Rasnita'; [EMAIL PROTECTED] > Subject: RE: Using strict and configuration files > > > Bob, > > Exactly what does "our" do? I understand "my" a

RE: Using strict and configuration files

2002-06-11 Thread Camilo Gonzalez
Bob, Exactly what does "our" do? I understand "my" and even "local" but have yet to grasp the "our" concept. -Original Message- From: Bob Showalter [mailto:[EMAIL PROTECTED]] Sent: Tuesday, June 11, 2002 9:12 AM To: 'Octavian Rasnita'; [EMAIL PROTECTED] Subject: RE: Using strict and conf

RE: Using strict and configuration files

2002-06-11 Thread Bob Showalter
> -Original Message- > From: Octavian Rasnita [mailto:[EMAIL PROTECTED]] > Sent: Sunday, May 28, 2000 4:32 AM > To: [EMAIL PROTECTED] > Subject: Using strict and configuration files > > > Hi all, > > I want to use: > > use strict; > > And I want to use a configuration file in a Perl s

RE: single quotes kill my scripts

2002-06-11 Thread Bob Showalter
> -Original Message- > From: Rob Roudebush [mailto:[EMAIL PROTECTED]] > Sent: Monday, June 10, 2002 9:08 PM > To: [EMAIL PROTECTED] > Subject: single quotes kill my scripts > > > > I have the following code - when someone enters a whatever > ' whatever into one of my forms my script

Re: Parsing HTML Form Data in Perl

2002-06-11 Thread Tor Hildrum
> I have written a e-mail script but cannot get the From part of the > sendmail protical to recognize e-mails with a period in the user name > like [EMAIL PROTECTED] It causes errors. I know if I send > brook/.hurd@gm/.com it will work. /. or \.? > I cannot locate the code required to > parse

Parsing HTML Form Data in Perl

2002-06-11 Thread Brook Hurd
-BEGIN PGP SIGNED MESSAGE- Hash: SHA1 I have written a e-mail script but cannot get the From part of the sendmail protical to recognize e-mails with a period in the user name like [EMAIL PROTECTED] It causes errors. I know if I send brook/.hurd@gm/.com it will work. I cannot locate the

Re: Using strict and a configuration file?

2002-06-11 Thread Ramprasad A Padmanabhan
just define all vars in ur conf file with a scope reslution eg $global::test = 'hello'; Octavian Rasnita wrote: > Hi all, > > Is it possible to use "use strict;" if I get the variables from a > configuration file? > > I've tried: > > use strict; > require "f:/xxx/config.txt"; > > #In the co

Re: Need a way to begin learn Perl

2002-06-11 Thread Marty Landman
At 05:05 PM 6/10/02 -0700, drieux wrote: >on http://thecgibin.com/index/faqs.shtml?Perl's_Quote_Words_Feature >you make the assertion > > my @peppers = (qw(green red yellow black cayenne)); > >is this an old perlism since I have always done that as > > my @peppers = qw(green r

Re: single quotes kill my scripts

2002-06-11 Thread Janek Schleicher
Rob Roudebush wrote at Tue, 11 Jun 2002 03:07:44 +0200: > I have the following code - when someone enters a whatever ' whatever into one of >my forms my > script dies because of the single quote. Aggg... of course the first time I >come across it is > when my boss is testing out the sc

Re: Example for "uniq"

2002-06-11 Thread Felix Geerinckx
on Tue, 11 Jun 2002 07:36:48 GMT, [EMAIL PROTECTED] (Chang Ming Huei) wrote: > To count the repeated data, I can use > cat xxx.dat | uniq -c > > It can get the result > 3 aa > 2 bb > 1 cc > > But how to do it use perl ? #! perl -w use strict; my %words; $words{$_}++ while (

Example for "uniq"

2002-06-11 Thread Chang Ming Huei
Hi,all If I have a set of data as following: aa aa aa bb bb cc To count the repeated data, I can use cat xxx.dat | uniq -c It can get the result 3 aa 2 bb 1 cc But how to do it use perl ?