Rob,
GREAT thanks, your explanantion is very detailed and very clear. Looks
like I don't have a clear understanding regarding -n option, so I have
something for reading for the evening :)
> If you
> want to have a decent solution that others can understand and read put this
> in a small script wh
Folks,
would you please explain me one string of code I could node
understand?
Here it is:
$ perl -ne 'chomp; $fmt = "%-10s %-10s %s\n";
> if ($ARGV eq "name") {$x{$_}++}
> elsif (/^ALTER TABLE (.*)/ and defined $x{$1}) {$in=1; $tbl=$1}
> elsif ($in and /^ADD\s*\(\s