Мда...

AEM 23.08.2007 17:41

$str[начало <script>бла-бла</script> <style>бла-бла</style> <script>бла-бла</script> оставить  <script>бла-бла</script> <style>бла-бла</style> конец]

$str[^str.match[<script>([^^<]+)</script>][gi]{}]
$str[^str.match[<style>([^^<]+)</style>][gi]{}]