Простое решение PERL:
perl -ne '1 while s/\(\)//g; print /[()]/ ? "Invalid\n" : "OK\n"' input.txt
Объяснение: цикл While удаляет ()
, пока он больше не будет возможно. Если есть какие-то скобки, они не были сбалансированы.
Это не похоже на YaST (YaST будет делать только самые простые вещи для Apache) ... вы можете найти что-то в расширенных настройках, где вы можете добавить модуль.
Однако вам, вероятно, все равно придется создать файл в /etc/apache2/conf.d, чтобы сообщить Apache, что делать, когда он встретит такой файл.
Вот ссылка для получения дополнительной информации.
Если ссылка идет вниз \ дополнительные сведения только для OpenSuSE :
Изменить / etc / sysconfig / apache2
Найдите раздел под названием APACHE_MODULES
а внутри кавычек добавить заклепку. Сохраните, выйдите и перезапустите apache rcapache2 restart
.
Если вам повезет, заклепка появится, но, скорее всего, нет. В этом случае отмените изменения. Сохраните и перезапустите apache (таким образом мы вернемся к квадрату 1).
Теперь вам нужно создать файл с именем /etc/apache2/conf.d/rivet.conf
Добавьте следующее (вам может потребоваться изменить местоположение):
LoadModule rivet_module /usr/lib64/apache2/mod_rivet.so
AddType application/x-httpd-rivet .rvt
AddType application/x-rivet-tcl .tcl
AddType 'application/x-httpd-rivet;charset=utf-8' rvt
DirectoryIndex index.tcl index.rvt
Сохраните это и перезапустите apache.
Это должно быть хорошим началом, но имейте в виду, что я никогда не использовал модуль заклепок, поэтому файл rivet.conf может быть неправильным. Дайте мне знать, и я отредактирую это, чтобы у нас была правильная информация.