my $source_directory = 'E:\\common\compare\latest folder\PDF\DB\\';
`dir $source_directory /b/s /o:-d`;