perl -c -e'use sand_kidB'