undef $life if ($last_programmed > (time-60*60*24*3) );