Thanks for the pointer! I guess I was been going down the right path all along! :) Knowing I was on the right track helped me figure out why it wasn't evaluating correctly(!) Turns out I wasn't chomp(ing) the input. # -------------------- my $generic = <STDIN>; chomp $generic; # -------------------- ... it *always* evaluated FALSE because of the 'return'. (DOH!) Thanks, -jp > -----Original Message----- > From: Bob Showalter [mailto:[EMAIL PROTECTED]] > Sent: Monday, August 06, 2001 8:28 AM > To: '[EMAIL PROTECTED]' > Subject: RE: Perl equivalent of "case" or "switch" statements ? > > > > -----Original Message----- > > From: jp [mailto:[EMAIL PROTECTED]] > > Sent: Monday, August 06, 2001 11:21 AM > > To: [EMAIL PROTECTED] > > Subject: Perl equivalent of "case" or "switch" statements ? > > > > > > > > I've been searching through books and web resources > > but can't seem to find any reference to equivalent > > of "case" or "switch" statements in Perl. > > > > Is there such a thing in Perl? > > > > (Every reference to the word "switch" leads me towards > > things like -w etc...) > > This is a FAQ. Try: > > perldoc -q switch > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
