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
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
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
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);
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