Help for this page
perl -nle "/TABLE;(.*)/?($t=$1):/COLUMN;([^;]*)/&&print(qq{$t.$1})" fi +le1.txt
syntax error at -e line 1, near "(=" Execution of -e aborted due to compilation errors.