, Если у вас Perl 5.10 или выше, я бы сделал, как предложил Брэд, и использовал бы оператор умного совпадения.
ли способ, которым я могу избежать использования этого для нескольких проверок шаблонов?
Могу ли я порвать все шаблоны в массиве и проверить, совпадает ли он с каким-либо шаблоном в массиве шаблонов? Пожалуйста, рассмотрите случай, когда у меня более 20 шаблонных строк.
if( ($_=~ /.*\.so$/)
|| ($_=~ /.*_mdb\.v$/)
|| ($_=~ /.*daidir/)
|| ($_=~ /\.__solver_cache__/)
|| ($_=~ /csrc/)
|| ($_=~ /csrc\.vmc/)
|| ($_=~ /gensimv/)
){
...
}