#!/usr/bin/ksh
while :
do
  cd <dir>
  perl -0777 -ne '$foo=s/\0{30}\t\0\0\(\0//g;rename $ARGV,"../capture/n
ested/$ARGV" if ($foo >= 10)' di*
  sleep 3
done