my($yesterday)=1;
my($fileAgeInDays) = ((time() - (stat($eachFile))[9]) / 24 / 60 / 60);

print $fileAgeInDays, " days since it was created\n\n";

if($fileAgeInDays = $yesterday) 
		{	
		print $eachFile,"\n";
		} else {
		print " No files found \n";
			}