Re^2: regular expression to get the tablename.column

perl -F/;/ -lane "/TABLE;(.+)/ and $t=$1 or print qq($t.$F[1])" o33.tx
+t
[download]

Oops !! still I did not get the prompt. keeps on running

Comment on Re^2: regular expression to get the tablename.column_name Download Code

Replies are listed 'Best First'.
Re^3: regular expression to get the tablename.column_name by ikegami (Patriarch) on Oct 18, 2006 at 04:14 UTC
Unlike the OP's version, your version won't handle blank lines or lines other than TABLE and COLUMN properly. If that's acceptable, then the following is even shorter: `perl -nle "/TABLE;(.)/?($t=$1):/;(.);/&&print qq($t.$1)" o33.txt` [download]	[reply] [d/l]