The final close is likely flushing a buffer, which is writing a bit more to the file. Close the filehandle, then issue the utime().

-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.