my @args;
...

$bet = "and CONVERT(CHAR(10),tdate,101) between ? and ?";
#                                               ^     ^
#                                             not quoted

push @args, $fromdate, $today;