Select Code to Download

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