use DateTime;
print DateTime->now->add(days=>-7)
  ->strftime('%m%d%H%M%Y'), "\n";
__END__
031614272015