perl -e '@size=qx|du --total /home/*|;print $size[$#size];'

my result: "1093296      total"