sub _findcb {
	$size += -s $_ || 0;
}