Select Code to Download

$nDateStamp = '082411';
$tDateStamp = '082511';
...
  $filename =~ s/$tDateStamp/$nDateStamp/;
  print "found\n$filename\n";
}

$nDateStamp = '082411';
$tDateStamp = '082511';
...
    print "found\n$filename\n";
}