Only show one atime of 10 files

[Rusher2K]

Hello i want to write a scripts that delet all logs in my logs direktory what are older than 20 days bus when i use :

Code: Select all

!tcl foreach file ./logs/ { set time2 [file atime $file]; set time2 [ctime $time2] ;putserv "PRIVMSG $chan :$time2 " }

It only response one of the files

Code: Select all

 Mon Jan 26 14:53:38 2004
<empty string> - clicks: 335

but why ?

And my log dir has some Sub-direktory`s how i let him fetch all direktory`s ?
Thx for Help

[user]

What made you think passing the string "./logs/" to 'foreach' would give you a directory listing?
Use 'glob' to list files.

[caesar]

For subdirs:

Code: Select all

catch { glob -type d <path>/* } dirs

and for files:

Code: Select all

catch { glob -type f <path>/* } files

[user]

catch catch catch

We've been through this before There's no need to catch 'glob' ...use the -nocomplain option if you don't want errors when there's no matches.

[caesar]

Damn, I tend to rush things and don't go directly to the source of things first.. Thanks for pointing that out (again) I think I shall delete this old .tcl file cos makes me do bad things

[user]

I shall delete this old .tcl file cos makes me do bad things

Why not update it?

[caesar]

Is/was an web page generator with the files of a dir.. umm.. duno, maybe cos I don't use it anymore..

Btw, nice eyes moving thing