Select Code to Download

@to_search = qw' /exists /doesnt-exist ';   # master list

find( { wanted => \&wanted, bydepth => 0 }, grep { -d } @to_search);

@not_found = grep { ! -d } @to_search;
warn "Not found: " . join(", ", @not_found) . "\n" if @not_found;