http://www.perlmonks.org?node_id=313118


in reply to Apply mtime and atime to new file

Don't you want 

  utime($atime, $mtime, $found_file);

[download]
rather than operating on $new_str which you've just renamed?

Hope this helps, -gjb-

In Section Seekers of Perl Wisdom