Select Code to Download

use Getopt::Long;

...
  print "Tag received: '$_' => '".$tags{$_}."'\n" for(keys %tags);
  @results = $tree->look_down(%tags);
  ...