Select Code to Download

print exists $search{$_}   ?
          "$_ : Found $_\n"    :
          "$_ : Not Found $_\n";

if (exists $search{$_})
{
...
{
    print "$_ : Not Found $_\n";
}