Re: Case statements

2005-04-12 Thread Jonathan Paton
On Apr 12, 2005 4:24 PM, David Gilden <[EMAIL PROTECTED]> wrote: > Hello, > > I am trying to create case statement, and I am not sure I am on the right > track, > any comments? perldoc Switch Jonathan Paton -- #!perl $J=' 'x25 ;for (qq< 1+10 9+14 5-10 50-9 7+13 2-18 6+13 17+6 02+1 2-10 00+4 0

RE: Case statements

2005-04-12 Thread Chris Devers
On Tue, 12 Apr 2005, Wagner, David --- Senior Programmer Analyst --- WGO wrote: > Chris Devers wrote: > > Also, as a side note, if $whichForm is numeric, you should just use > > the nueric comparisons rather than the string ones: > > > > if $whichForm eq "123" # bad! > > if $whichForm

RE: Case statements

2005-04-12 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Chris Devers wrote: > On Tue, 12 Apr 2005, David Gilden wrote: > >> I am trying to create case statement, and I am not sure I am on the >> right track, any comments? > > Would something like this get the same result? > > my %form_action = ( > 000 => sub {}, # silently ignore this one

Re: Case statements

2005-04-12 Thread Chris Devers
On Tue, 12 Apr 2005, David Gilden wrote: > I am trying to create case statement, and I am not sure I am on the right > track, > any comments? Would something like this get the same result? my %form_action = ( 000 => sub {}, # silently ignore this one 123 => handle_form(123);

Re: Case statements

2005-04-12 Thread Ing. Branislav Gerzo
David Gilden [DG], on Tuesday, April 12, 2005 at 10:24 (-0500) typed the following: DG> I am trying to create case statement, and I am not sure I am on the right track, DG> any comments? try to write at your console your subject, eg: perldoc -q "case statement" -- ...m8s, cu l8r, Brano. ["W