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


in reply to How do I determine if a file was modified today?

If by "today" you mean "in the last 24 hours", try this:
if (1 > -M $filename) { # Your code here }

-----
Be bloody, bold, and resolute; laugh to scorn
The power of man...

Replies are listed 'Best First'.
Re: Re: How do I determine if a file was modified today?
by clintp (Curate) on Jun 02, 2001 at 17:30 UTC
    Nice and concice. If the poster meant "in the last 24 hours" to mean this calendar day, let's combine this concise answer with some of the others above:
    if ( 1 > -M $file and (localtime((stat _)[9]))[3] == (localtime)[3] ) { # modified "in the last 24 hours" }
    Beware of small, subtle bugs around Daylight Savings time.