Select Code to Download

   @not_true = grep(! $_->{true}, @true_or_false);

  (@foo,@bar,@zap) := part [ /foo/, /bar/, /zap/ ] @source;