Select Code to Download

# nifty trick -- make a hash to ease the lookup in the findit sub

...
    $File::Find::prune = 1 if $excludeit{$_};
    # ..
}