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


in reply to RE: From the good book
in thread From the good book

You forgot a 60...
undef $life if ($last_programmed > (time-60*60*24*3) );