use List::Util 'sum';
use File::Find::Rule;

my $dirsize = sum map -s, find( file => in => shift || '.' );