$pat = '(' . join('|', @patterns) . ')';
$pat = qr/$pat/i;