Как проверить соответствие множественных шаблонов в Perl

Могу ли я избежать использования этого для множественных проверок шаблонов?

Могу ли я разорвать все шаблоны в массиве и проверить, соответствует ли он какому-либо шаблону в массиве шаблонов? Пожалуйста, рассмотрите случай, когда у меня более 20 строк шаблонов.

if(  ($_=~ /.*\.so$/)
  || ($_=~ /.*_mdb\.v$/)
  || ($_=~ /.*daidir/)
  || ($_=~ /\.__solver_cache__/)
  || ($_=~ /csrc/)
  || ($_=~ /csrc\.vmc/)
  || ($_=~ /gensimv/)
){
  ...
}