bind time - "* * 01 * *" time:sifirla proc time:sifirla {min hour day month year} { global sahip sifirla $sahip 1 2 3 4 }