sub callbacks_for_today {

    my $username = shift or confess 'must supply username';

    ["
SELECT
  *
FROM
  call_schedule
  INNER JOIN person ON (user_people_id=people.id)
WHERE
  DATE_FORMAT( `callback_time` , '%Y-%m-%d' ) = DATE_FORMAT( NOW( ) , '%Y-%m-%d' ) -- date_clause
  AND staff_people_id = users.people_id
  AND username =", \$username,
"
ORDER BY
  callback_time DESC
    "]

}