sub is_it_time {
    my ($year,$month,$day, $hour,$min,$sec) = Today_and_Now();
    if ($min == 29) {
        return 1;
    } else {
        return 0;
    }
}