this may help...

to find the actual files.. and get some data on them..

for ( split( /\n/, `find /your/path/to/txtfiles -maxdepth 1 -size +102
+4k -printf "%p,%b\n"`) ){
  $file= $_[0];
  $sizeink= $_[1];
}
[download]

this is goofied up.. do a 'man find' - and a lot of people hate backticks.. it's bad with any tainted data stuffs