$du = join( '', grep !/^.*?Maildir.*?(?:cur|tmp|new|courierimapkeywords)$/, `du -ch $homedir` ); print $du;