Help for this page

Select Code to Download


  1. or download this
    perl -ne '/^TABLE;([^;\n]+)/ && ($table = $1) or /^COLUMN;([^;\n]+)/ &
+& print "$table.$1\n"' data.txt
  2. or download this
    awk -F ';'  '/^TABLE/ {table=$2} /^COLUMN/ {printf("%s.%s\n",table,$2)
+ }' data.txt