my $thresh := $obj.threshold;
	while (<>) {
		$thresh += $_
			unless $thresh > $min;
	}