my @files = File::Find::Rule->name(qr/UFLEX.*stdf$/)
                               ->file()
                               ->in(cwd());
 
foreach my $file (@files) {

print "$file\n";

##</code><code>##

 /datalogs/TD+/prod/temp/UFLEX13_UD16B208.1apr25_03_45.stdf