$nDateStamp = '082411';
$tDateStamp = '082511';

$filename = '17000_DM161_082511.dat';
if ( $filename =~ s/$tDateStamp/$nDateStamp/) {
    print "found\n$filename\n";
}