catch {putlog "UPDATE: \"$pwd\" \"\002$user\002 uploaded \002 [lindex [split [lindex $args 2] "/"] end]\002 @ \002[format %.0f $speed]\002\""} [format %.2f $speed] = 2 decimals