next if $name eq '.' or $name eq '..';

##</code><code>##

next unless $name =~ /Temp$/;