perl regex match word that could have multiple hyphens

I am having a difficult time trying to form a perl regular expression that would match a word (made up of alphanumeric characters and underscores) that contains multiple hyphens in different places. I can match with one hyphen, but when there are other hyphens I can not think of anything and have looked around the web and have found nothing that would work.

For example, the part of the regex I now have that will match with 1 hyphen is:  (\w+-*\w*)
This will match, for example, 'wry-29', but not 'wry-29_th-34'

What I am trying to match could have 4 or more hyphens scattered about in the 'word'.
I could just repeat the expression 4 times,  \w+-*\w*-*\w*-*\w*-*\w*, but there would end up being 5 hyphens in the next thing I work on, and I would like to find a more elegant solution.
vbaabvResearch ScientistAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

wilcoxonCommented:
Use repetition of sets:
/\b[\w-]+\b/

Open in new window

0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
vbaabvResearch ScientistAuthor Commented:
Works really well.  Great job !
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Perl

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.