Mine

=========SCRIPT: dirs ===============

#!/bin/bash

act=`pwd`

cd $1
find . -maxdepth 1 -type d -print0 | xargs -0 /home/anibal/temp/compr

cd $act


=========SCRIPT: compr ===============

#!/bin/bash

#echo $1

IFS=""
for dir in $*; do
  dir2=`echo $dir | sed -e 's/.\///' | grep ^[0-9A-Za-z]`
  tar cvzf "/home/anibal/temp/$dir2.tgz" "$dir2"
done