my $large_pattern = join '|', @PatternList;