next unless {-d "$ldir/$name"};

##</code><code>##

   next unless -d "$ldir/$name";

##</code><code>##

 my @races = undef;

##</code><code>##

my @races;


##</code><code>##

use Data::Dumper;
print Dumper(\@races);