in reply to matching strings...

Try this: 

if ($string =~ m/^(this|or_this|or_that)$/i) {
 ...
}

[download]

update: Since I'm being downvoted, maybe I wasn't clear enough. I replaced eq with =~ and inserted the ^ (beginning of line) and the $ (end of line) matching operators. This to ensure that you receive an exact match for "this" or "or_this" or "or_that" (otherwise "foothisbar" would have matched).

-- 
dempa

Replies are listed 'Best First'.
Re: Re: matching strings...
by powerhouse (Friar) on Jan 27, 2003 at 07:52 UTC
    Thank you, Dempa, and everyone else too :o)

    That worked. I have what I guess is called a hash:

    @field = (
{name=> "this", size=>2, value=>"none", req=>1},
{name=> "this_one", size=>4, value=>"none2"}
);

    [download]

    Kind of like that one, but more fields, and obviously different.
    I use it for our registration system, however, I also am going to use the same one for a contact us form, but I don't need username, password and so forth, so I when I'm building my form with CGI.pm from that "hash", I am having it skip the fields I don't want in the form, using next if $string eq "name";

    I wanted it all to be in the same line though, instead of a bunch of needless code.

    It worked.

    Thank you!
    Richard
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom