find `pwd` -ctime +100 -maxdepth 1 -type f -exec ./doit.sh '{}' ';'

:> cat doit.sh
file=$1

mv $file storitsch/$file
ln -sf /home/sophus/tmp/storitsch/$file $file