egghelp.org community :: View topic - How many Files in Folder?

egghelp.org community Forum Index

[ egghelp.org home | forum home ]

egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.

FAQ

Usergroups

Register

Log in to check your private messages

How many Files in Folder?

egghelp.org community Forum Index -> Scripting Help

View previous topic :: View next topic

Author

Message

Access
Voice

Joined: 04 Jun 2006
Posts: 22

Posted: Mon Aug 28, 2006 10:10 am Post subject: How many Files in Folder?

I want to know how many files with ending .moep are in /filebase/ folder... How? ^^ (Too short? dont know how to explain...) 2nd question - no extra thread: how to delete all files with ending .moep in /filebase/ folder...?

Send private message

krimson
Halfop

Joined: 19 Apr 2006
Posts: 86

Posted: Mon Aug 28, 2006 10:21 am Post subject:

Reply with quote

for the first question:

Code:

set filenum 0
foreach entry [glob -directory /filebase/ *.moep] {
incr filenum
}
return $filenum

and for the second:

Code:

foreach entry [glob -directory /filebase/ *.moep] {
file delete $entry
}

Send private message

Send e-mail

Access
Voice

Joined: 04 Jun 2006
Posts: 22

Posted: Mon Aug 28, 2006 11:21 am Post subject:

very nice! thx!

Send private message

metroid
Owner

Joined: 16 Jun 2004
Posts: 771

Posted: Mon Aug 28, 2006 1:56 pm Post subject:

Reply with quote

Why use incr?

Code:

proc filecount {file} {
return [llength [glob -nocomplain $file]]
}

Could be used with [filecount /home/myuser/*.something]

Send private message

Display posts from previous:

	egghelp.org community Forum Index -> Scripting Help	All times are GMT - 4 Hours
Page 1 of 1

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber