perl -sne " BEGIN { @ARGV = map glob( $_ ), @ARGV } /\[$TAG\]/ ... /\[\/$TAG\]/ && print qq[$ARGV($.):$_]; close ARGV if eof "  --  -TAG=tath_tag  ./*/dir/*.ext