foreach (@arraydirectory){
		my $cleansource = $source; $cleansource .= "\\"; $cleansource .= $_;
		$sourceResult = dir_size($cleansource, $sourceDirInfo,);
		$sbyte += $sourceDirInfo->{DirSize}; 
		$sourceSize = best_convert($sourceSizeUnit, $sourceDirInfo->{HighSize}, $sourceDirInfo->{LowSize},);
		my $s = $sourceSize;
		$s .= $sourceSizeUnit;
		$table->add($_);
		$table->itemCreate($_, 0, -text => $_);
		$table->itemCreate($_, 1, -text => $s);
	}#foreach