print STDERR "I: Replacing ", $best->{'Host'}, " (pri $bestpri)\n";
delete $best->{'Row'};
}
- print STDERR "I: Allocated ", $s->{'Host'}, " \@$besti (pri $pri)\n";
+ print STDERR "I: Allocated ", $s->{'Host'}, " \@$besti (pri $pri)\n" if $debug;
$s->{'Row'} = $besti;
$by_row[$besti] = $s;
} else {