perl -ne 'print if /<!--TABLE -->/ .. m|<!--/TABLE -->/|' *.tpl > data