CUFP
GotToBTru
<p>We get the quantity of a product shipped from the database, and a list of individual carton labels from an external file. The actual contents of each carton are unknown. Working assumption would be qty per carton = shipped qty / carton count. Easy enough. But what if the division doesn't come out clean?</p>
<c>
use POSIX qw/ceil/;
...
$sq = $shipped_quantity;
$cc = $carton_count;
foreach $label(@label_list) {
if ($cc == 0) {
print "Qty per carton math error";
next OUTER;
}
$per_container = ceil($sq/$cc);
$sq -= $per_container;
$cc -= 1;
...
}
</c>
<p>If shipped quantity is 8 and carton count is 5, first 3 cartons will have 2 each, last 2 have 1.</p>
<p>Yeah, almost too simple to mention. But this came up today, and I remember little code bits like this better when I write them down somewhere.</p>
<p>Update: s/box/carton/
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-844862">
<center>Dum Spiro Spero</center>
</div></div>