Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: matching strings...

by dempa (Friar)
on Jan 27, 2003 at 07:32 UTC ( [id://230161]=note: print w/replies, xml ) Need Help??


in reply to matching strings...

Try this:

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

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

    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

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://230161]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others rifling through the Monastery: (4)
As of 2024-04-19 03:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found