Instead of piping out to find and saving that to a hash, you could use File::Find and utilizing the wanted function, compare the found file with the pre-loaded yesterdays' finds.

-derby