perl -c -Msand_kidB -e1