my @result = (`cmd to get result`) ;
   foreach $result (@result) {
			@streams = ;
			@spaces = ;
  		}