Code: Select all
set when [ctime [file atime filename]]
Code: Select all
set when [ctime [file atime filename]]
Code: Select all
file atime <filename>
Code: Select all
set starttime [clock clicks -milliseconds]
set length [expr abs([clock clicks -milliseconds] - $starttime) / 1000.0]
putserv "PRIVMSG $chan: It took $length seconds"