while ( my ( $siteid, $monthly_cost ) = $sth->fetchrow_array ) {
  $monthly_cost = sprintf '%16.2f', $monthly_cost;
  ...
}