A script that runs once every hour

[daplaya]

Here's what I want to do.
I want to upload a *.html file with sendftp.tcl once/hr
But I'm having with problems with the timer script, I want it to call this 1/h

sendftp <localfile> <server> <user> <password> <remotefile>

Can u help?

[Wcc]

Code: Select all

if {[lsearch -glob [timers] "* timer:sendftp *"] == -1]} { timer 60 timer:sendftp }

proc timer:sendftp {} {
  sendftp <localfile> <server> <user> <password> <remotefile> 
  if {[lsearch -glob [timers] "* timer:sendftp *"] == -1]} { timer 60 timer:sendftp }
}

[Petersen]

thats the old fasioned way of doing it. using 'bind time' is more efficient

[daplaya]

Thanks wcc, I haven't had the chance to try it yet cause my shell provider seems to be down atm

About "the new way", I read some about bind time and I want to know if this looks ok:

Code: Select all

bind time - "56 * * * *" time:sendftp

proc time:sendftp {} {
  sendftp etc. 
}

[Wcc]

No, you need to specify arg's for the proc (or just use 'args').

Code: Select all

bind time - "56 * * * *" time:sendftp

proc time:sendftp {args} {
  sendftp etc. 
}

[daplaya]

Yeah, I discovered that when I tried to run it, thanks anyway