Select Code to Download

use Croak qw/croak/;  # (update; don't forget this line, if making a m
+odule)

...

    return @added_list;
}

my @new_list = split /\x0/, `find $chkpath -type d -print0`;