Ich versuche zu verwenden reguläre Ausdrücke, um nur die Befehle, die nicht das Wort "Tablespace" in ihr. einen Befehl beginnt mit "CREATE TABLE" und endet mit; (Semikolon)

Beispiel-Datei:

create table first tablespace ;
create table second
(
  BBL_CUSTOMER_NAME      VARCHAR2(32),
a tablespace af
);
create table third
(
  BBL_CUSTOMER_NAME      VARCHAR2(32),
);
create table 
forth
(
  BBL_CUSTOMER_NAME      VARCHAR2(32) );

create table third
(
  BBL_CUSTOMER_NAME      VARCHAR2(32),
);
create table 
forth
(
  BBL_CUSTOMER_NAME      VARCHAR2(32) );

Sie können versuchen, dass so etwas wie:

awk '
   BEGIN { 
      RS=ORS=";\n"
   }
   /create/ && ! /tablespace/ {
      sub(/^\n*/, "");
      print
   }
    ' inputfile

awk -v RS=";\n" -v ORS=";\n" ' !/tablespace/ ' filename

Ich möchte versuchen, nur mit grep

Hi.

Ich glaube, dass grep wird nicht durch Zeilenumbrüche, so dass Sie es brauchen, um Ihre Befehle jeweils auf einer einzigen Zeile. Es ist eine Notiz in meinem Mann grep Seite über die Verwendung von perl reguläre Ausdrücke, sondern dass es ohne Papiere. Der awk und perl Skripte nutzen können einstellbare Aufnahme Grenzen.

Hier ist eine perl quickie:

#!/bin/sh

# @(#) s1       Demonstrate perl quickie for unmatched string across lines.

FILE=${1-data1}

perl -wn -e 'BEGIN{$/=";"} print if not /tablespace/' $FILE

exit 0

% ./s1

create table third
(
  BBL_CUSTOMER_NAME      VARCHAR2(32),
);
create table
forth
(
  BBL_CUSTOMER_NAME      VARCHAR2(32) );

einfaches und sauberes

warum ist das so?