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