#!/usr/bin/perl
chdir '/home/cpanel/cpanelsync/cpaddons';
my @syncdirs = split(/\n/,`find . -name ".cpanelsync"`);
open(my $dist_fh,'>','distlist-cpaddons');
print {$dist_fh} "version 1.0\ntree:cpaddons:distversion:1.0:arch:noarch:system:all\n";
foreach my $dir (@syncdirs) {
    $dir =~ s/^\.\///;
    $dir =~ s/\/?\.cpanelsync$//;
    next if (!$dir);
    print {$dist_fh} $dir . "\n";
} 
close($dist_fh);
