if (not grep(m{^/(usr|sbin|platorm|lib)$}, @filelist) {
    ...
}