my $input = <main::DATA>;
my $d = 0;
$_ = $input;
s/\.(\d{4})(\d{2})(\d{2})\.\w+\s+(\d+)\/(\d+)\/(\d{4})\s/{$d = "$1$2$3" if $d<"$1$2$3" && $1==$6 && $2==$4 && $3==$5}/eg;
__DATA__
File:tfo.supplement.20120901.done 9/1/2012 3:48:00 AM
File:tfo.supplement.20120901.zip 421144 KB 9/1/2012 3:48:00 AM
File:tfo.supplement.20120904.done 9/4/2012 3:57:00 AM
File:tfo.supplement.20120904.zip 421794 KB 9/4/2012 3:57:00 AM
File:tfo.supplement.20120905.done 9/5/2012 3:28:00 AM
File:tfo.supplement.20120905.zip 421875 KB 9/5/2012 3:28:00 AM
File:tfo.supplement.20120907.zip 421875 KB 9/6/2012 3:28:00 AM # NO-MATCH!
JC8gPSB1bmRlZjsKbXkgJGlucHV0ID0gPG1haW46OkRBVEE+OwpteSAkZCA9IDA7CgokXyA9ICRpbnB1dDsKcy9cLihcZHs0fSkoXGR7Mn0pKFxkezJ9KVwuXHcrXHMrKFxkKylcLyhcZCspXC8oXGR7NH0pXHMveyRkID0gIiQxJDIkMyIgaWYgJGQ8IiQxJDIkMyIgJiYgJDE9PSQ2ICYmICQyPT0kNCAmJiAkMz09JDV9L2VnOwoKcHJpbnQgJGQ7CgpfX0RBVEFfXwpGaWxlOnRmby5zdXBwbGVtZW50LjIwMTIwOTAxLmRvbmUgICA5LzEvMjAxMiAgICAzOjQ4OjAwIEFNIApGaWxlOnRmby5zdXBwbGVtZW50LjIwMTIwOTAxLnppcCAgICA0MjExNDQgS0IgICA5LzEvMjAxMiAgICAzOjQ4OjAwIEFNIApGaWxlOnRmby5zdXBwbGVtZW50LjIwMTIwOTA0LmRvbmUgICA5LzQvMjAxMiAgICAzOjU3OjAwIEFNIApGaWxlOnRmby5zdXBwbGVtZW50LjIwMTIwOTA0LnppcCAgICA0MjE3OTQgS0IgICA5LzQvMjAxMiAgICAzOjU3OjAwIEFNIApGaWxlOnRmby5zdXBwbGVtZW50LjIwMTIwOTA1LmRvbmUgICA5LzUvMjAxMiAgICAzOjI4OjAwIEFNIApGaWxlOnRmby5zdXBwbGVtZW50LjIwMTIwOTA1LnppcCAgICA0MjE4NzUgS0IgICA5LzUvMjAxMiAgICAzOjI4OjAwIEFNCkZpbGU6dGZvLnN1cHBsZW1lbnQuMjAxMjA5MDcuemlwICAgIDQyMTg3NSBLQiAgIDkvNi8yMDEyICAgIDM6Mjg6MDAgQU0gICMgTk8tTUFUQ0gh