list=$(find . -maxdepth 1 -type d | sort | grep -v "^\\.$")

    echo "$list" | xargs -n 1 -d '\n' du -s | while read size name
    do
        if [ $size -lt 2000 ] ; then echo "$name"
        fi
    done