Select Code to Download

my %search;
@search{@DB} = ();
...
          "$_ : Found $_\n"    :
          "$_ : Not Found $_\n";
}

$invert ? ($true, $false) : ($false, $true) = (0, 1);