if ($file=~/[a-zA-Z0-9_]\.dat/){

##</code><code>##

if( -e $file ) {