my $regex = join '|', map "\Q$_\E?", @filelist;